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FOREWORD 


This document is Volume II of a two volume report describing the Re- 
acting and Multi- Phase ^RAMP) Computer Code developed by the Advanced 
Technology Systems Section of Lockheed's Huntsville Research & Engineering 
Center. Volume H addresses the computer code along with the program input 
and output. Volume I deals with the theory and numerical solution for the 
computer code. 

Documentation of the computer code was prepared in partial fulfillment 
of contract requirements (Contract NAS9- 14517) with the NASA- Johnson Space 
Flight Center, Houston, Texas, in support of Space Shuttle related exiiaust 
plume applications. The contracting officer's technical representative for 
this study was Mr. Barney B. Roberts of the Aerodynamics Systems Analysis 
Section. 

The authors acknowledge the efforts of a number of individuals who 
contributed to the development of the RAMP code. These include Dr. Terry 
F. Greenwood and Mr. David C. Seymour of the NASA-Marshall Space Flight 
Center; and Messrs. Robert J. Prozan, Jon A. Freeman, L. Ray Baker and 
A. W. Ratliff of Lockheed-Huntsville. Ideas and suggestions for improvement 
of the analysis are reflected by frequent consultation with these individuals. 

Companion . documents to this report include a theory and numerical 
solution document for the RAMP computer code; a report which describes the 
modifications made to the NASA-Lewis TRAN72 computer code; and documenta- 
tion of a one-dimensional solution which provides a supersonic startline for 
the RAMP code. These documentation are, respectively: 
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• "Supersonic Flow of Chemically Reacting Gas-Particle Mixtures — 
Volume I— A Theoretical Analysis and Development of the 
Numerical Solution," LMSC-HREC TR D496555-I. 

• "User's Guide for TRAN"’ 2 Computer Code Modified for use with 
RAMP and VOFMOC Flowfield Codes," LMSC-HREC TM D390409. 

• "General One- Dimensional Flow of Gas- Particle System," 
LMSC-HREC TM 390876. 
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Section 1 

INTRODUCTION AND SUMMARY 
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Most solid rocket motor propellants contain metal additives which in- 
crease the energy content of the system and also suppress combustion pressure 
instabilities. The presence of these metal additives, however, results in 
condensed products in the exhaust which can do no expansion work and thereby 
reduce the effectiveness of the nozzle. Also, the presence of Uquid or solid 
particles in the exhaust will contribute significantly to radiation and plume 
impingement heating on structures which are either immersed or in proximity 
to the exhaust plume. It is therefore important to know the physical properties 
of both the solids and gases throughout the nozzle and exhaust plumes. 

This report describes two computer programs which are applicable to 
the analysis of chemically reacting gas-particle flow fields. The programs 
are; 

• The NASA-Lewis FORTRAN IV Computer Program for 
Calculation of Thermodynamic and Transport Properties 
of Complex Chemical Systems (TRAN72) 

• The Lockheed Reacting and Multi- Phase Computer 
Program (RAMP). 

These programs are currently operational on the CDC, Univac and IBM 
computers. To facilitate the use of the codes, they are constructed such that 
automatic transmission of data to other computer programs is possible via 
magnetic tapes. 

Section 2 presents a description of the modifications made to the TRAN72 
computer program to meet the general requirements of Lockheed's RAMP 
program and provides instructions for operating the modified TRAN72 program. 
Four example cases are presented which show the required input format 
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and resultant output for creation of thermodynamic data for typical rocket 
performance problems. No attempt is made here to report on the program 
itself since this information is documented in Refs, 1 and 2. 

Section 3 of this report discusses the RAMP program. Included are; 

• A discussion of the basic capabilities and limitations 
of the program. 

• A user's input guide for the RAMP program. 

• A description of the typical input/output for a two-phase 
chemical equilibrium flow problem; a single phase chemical 
equilibrium flow problem with free molecular considerations 
and a single phase fidite rate chemistry flow problem. 

• A discussion of typical user problems and possible fixes. 

• A list of helpful hints and a presentation of example deck 
, set-ups. ■ ■ . 

• A brief description of each of the basic routines in 
functional groupings. 

• A detailed discussion of each individual routine used in 
the program. 

• Program overlay structure, 

• A section of typical example problems including a statement 
of the problem, accompanying figure and sample input and 
output. 

The gas -particle capability has been incorporated into a streamline- 
normal method of characteristics computer program (Ref. 3), Choosing 
this technique provides several important advantages in describing flowfields 
which contain a gas- particle mixture not found in conventional method of 
characteristics program (Ref, 4), and at the same time, retains the same 
sophistication and capabilities of these programs. First, the streamline- 
normal method allows a data, point on a particle limiting streamline to be 
treated in the same fashion as a data point on a gas streamline. This greatly 
simplifies the tracing of particle trajectories through the flow field. Also, 
another important feature is the reduction in computer storage requirement 
to identify the particle locations, Flow fields containing shock waves (both 
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right- running and left- running or in combination) can be analyzed in t>ne 
continuous operation, hence expediting the flowfield description of nozzles 
and plumes or other complicated geometries. 

These computer programs are extremely large and complex so that a 
complete description of them is not feasible in this report. It is possible, 
however, to utilize the programs with the information contained herein while 
total understanding of the methods is made possible by study of the supporting 
documentation. 

The computer programs are available for external distribution. Further 
information on obtaining the programs is available from the authors. 
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Section 2 

USER'S INPUT/OUTPUT GUIDE FOR THE MODIFIED TRAN72 

COMPUTER CODE 


The TRAN72 computer program (developed by NASA-Lewis Research 
Center (Ref. 1)) was synthesized by combining a program for the transport 
properties calculation with the CEC 71 program (Ref. 2) for the thermo- 
dynamic properties calculation. The TRAN72 program was subsequently 
modified to meet the requirements of Lockheed's reacting and Multi-Phase 
(RAMP) Computer Program (Ref. 5). The requirements satisfied were: 

(1) calculation of the theoretical rocket performance (for both equilibrium 
and frozen compositions) during a "gaseous -only" expansion, after a two- 
phase combustion chamber calculation; and (2) automated communication 
of these properties to the RAMP program. 


2.1 USE OF THE MODIFIED TRAN72 PROGRAM WITH THE RAMP 
PROGRAM 

Modifications were made to the TRAN72 chemical equilibrium calcu- 
lational scheme in order to generate thermochemical data consistent with 
the assumptions utilized in the RAMP program formulation. The assump- 
tions being addressed in the RAMP program are: 

• The total mass of the mixture is constant. 

• The total energy of the mixture is constant. 

• The gas obeys the perfect gas law and is either chemically 
frozen, in chemical non -equilibrium or in chemical equilibrium. 

• There is no mass exchange between the phases. 

• The particles are inert. 


In the modified TRAN72 calculational scheme, the chamber calculations 
are performed initially with the condensed species considered. The total mass 
and total enthalpy of the mixture are then adjusted by removing the mass and 


LOCKHEED - HUNTSVILLE RESEARCH & ENGINEERING CENTER 




enthalpy associated with the condensed species predicted to exist in the 
chamber after combustion. The total mass adjustment is made by re- 
moving the appropriate amount of mass of each of the elements which 
comprise the condensed species that exist in the chamber. The total 
enthalpy is adjusted by removing the enthalpy associated with the con- 
densed species that exist in the chamber. Next, the adjusted elemental 
mass balance relationships and the adjusted total enthalpy are referenced 
to the adjusted total mass of the mixture. All condensed species are then 
removed from the list of possiblo products being considered by the program. 
The chamber calculations and subsequent equilibrium chemistry expansion 
are then made with a gaseous -only composition. When the thermodynamic 
calculations are completed, the transport properties are calculated in the 
manner described in Ref. 1. The resultant equilibrium chemistry expansion 
and corresponding transport properties data are for the case in which there 
is no heat transfer between the condensed emd gaseous species during the 
equilibirum chemistx-/ expansion process. To account for the effects of the 
heat transfer that does take place between the condensed and gaseous species 
during the flowfield calculations, additional thermochemical data are required. 
To generate the required data, the total enthalpy of the gaseous -only mixture 
is perturbed (mass is held constant) and the thermochemical data calculational 
..cheme is repeated. The total enthalpy is repeatedly perturbed; the result 
being an array of equilibrium expansion processes and corresponding trans- 
port properties, each with a different degree of heat transfer between the 
two phases. 

Experience in thermodynamical modeling of rocket exhaust flows has 
indicated that many chemical syeiems experience a transition from equi- 
librium to frozen chemistry during the expansion process. The standard 
TRAN72 program has cin option to treat this problem. Under the pressure 
freeze option the chamber and initial expansion calculations are made as- 
suming equilibrium chemistry. At a predetermined pressure ratio (chamber 
to local static), the chemistry of the system is frozen and the remainder of 
the expansion is completed with frozen chemistry. With this option, the 
transport properties are calculated as outlined in Ref. 1. 
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The thermochemical and transport data are communicated to the RAMP 
computer program automatically through the use of a magnetic tape (or rapid 
access storage, i.e,, disk, FASTRAN, etc.)> Creation o£ the data tape (or file) 
is accomplished by means of an additional subroutine (MOCDAT) added to the 
TRAN 72 program. Logic is provided in this routine for creation of a new 
data tape (or file) and adding data to an existing Master data list. Each data 
case must be identified with a unique case name which is subsequently used 
by the RAMP (see card 8 of RAMP input guide) program to determine if 
thermodynamic data are available. An additional namelist has been added 
to the run stream to control use of the options available in the MOCDAT 
subroutine. 

The modified TRAN72 program is used to generate thermodynamic and 
transport properties of the gaseous phase of the products of combustion being 
considered in a two -phase flow analysis. Control of the program function for 
this application is handled through three input groups: the reactant data cards, 
the $INPT2 namelist, and the $RKTINP namelist, A detailed description of 
the standard TRAN72 program input is given in Ref. 1. Thermodynamic data 
required for this application are calculated using the RKT option under the 
$INPT2 namelist. Selection of this option permits calculation of theoretical 
rocket performance for both equilibrium and frozen compositions during ex- 
pansions. The variables MOC2P, PARTHT, QDOTP and NQI have been added 
to the $INPT2 namelist. The MOC2P variable controls the selection of the 
two-phase flow analysis option (M0C2P=T). The variables PARTHT, QDOTP 
and NQI control the selection (PARTHT=T) and use of the variable total en- 
thalpy option when the effects of heat transfer between the condensed and 
gaseous species are to be determined in a two-phase flow analysis. When 
PARTHT=T, QDOTP is set equal to the amount by which the total enthalpy 
of the gaseous only mixture is to be perturbed. NQI is set equal to the number 
of QDOTP values input. The specific values of the ratio of chamber to local 
static pressures (P /P) at which thermodynamic and transport data are gen- 
erated are input to the program in the $RKTINP namelist. The pressure freeze 
option is activated by setting the variable NFZ under the $RKTINP namelist 
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equal to the number of the pressure ratio at which transition from equilibrium 
to frozen chemistry is to occur. (The chamber is considered to be number 
one. the throat number two, etc.). Freeze pressures may be the chamber 
value or any supersonic pressure. No provision is made for freeze pressures 
between chamber and throat. The parameters which are generally utilized by 
the RAMP program are local Mach number, static pressure and temperature, 
isentropic coefficient (gamma), molecular weight, entropy, Prandtl number, 
viscosity, specific heat at constant pressure and the total enthalpy (gas only). 
These parameters, with the exception of the total enthalpy, are calculated for 
each value of (P^/P) ratio by the program, A detailed description of the logic 
involved in the standard TRAN72 program computation is presented in flow 
chart form in Ref. 1. This information can be consulted for an in-depth under- 
standing of the calculational scheme. 

To automatically create a tape for communication with the RAMP pro- 
gram requires that one of the two tape-write options be selected (MOCT=T, 
or MOCTF=T) under the $INPT2 namelist. The MOCT variable is utilized 
when the thermochem data are to be run completely under the equilibrium 
assumption. TLe MOCTF variable is utilized when the thermochem data are 
to be run completely or partially frozen. If one of these options is selected 
an additional namelist, $TAPGEN, must be input to control the tape -write 
function and the input of the case name card. The $TAPGEN data are input 
after the $INPT2 data but prior to the case name card and $RKTINP namelist 
inputs. Table 2-1 summarizes the program variables added to the modified 
TRAN 72 program. 

Four example cases showing the required input format and resultant 
output for creation of thermodynamic data for typical rocket performance 
problems are presented in Table 2-2. Case 1 is the required input to perform 
a calculation of theoretical rocket performance for both the equilibrium and 
frozen composition assumptions during an isentropic expansion. (No tape is 
generated.) Case 2 is the same as Case 1 except that a tape for communica- 
tion with other programs is generated for the frozen composition assumption 
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Variable 

Dimension 

Type 

Common 

,^abel 

Value 

Before 

Read 

MOCT 

1 

L 

HREC 

F 

MOC2P 

1 

L 

HREC 

i 

F 

MOCTF 

1 

L 

HREC 

F 

PARTHT 

1 

L 

TWOPAS 

F 


Table 2-1 

ADDITIONAL INPUT VARIABLES FOR MODIFIED* TRAN72 PROGRAM 

$INPT2 NAMELIST 

I Common vlkiT] 

'arrahle Dimension Tvoe ■ i Before Comment 


Selects tape -write option 
if true for equil.run. 

Selects two-phase flow 
analysis option if true. 

Selects tape -write option 
if true for frozen and 
pressure freeze options. 

Selects variable total 
enthalpy option if true 
for two-phase analysis 
run. 

Set equal to the amount 
by which the total enthalpy 
of the gaseous -cnly mix- 
ture is to be perturbed. 

Set equal to the number 
of O.DGTP values input. 


If equal 0, new data added 
to master data tape list; 
if equal 1 data written on 
new data tape. 

Tape unit of old master 
tape list. 

Tape unit of new data tape, 


QDOTP 


IREAD 


TWOPAS 


T WOP AS 


$TAPGEN NAMELIST 

”1 = I r~ 


1 

I 


1 

I 

— 

1 

I 

— 


Case Name Card 
Format: 6A4 


Routines modified from the original TRAN72 program are; LINK, MAIN 1 
REACT, SEARCH, EQLBRM, ROCKET, RKTOUT, OUTl, TRANSP, OUT. 

j; 

The values of QDOTP must always be input in ascending order (from the 
most negative to the most positive). 

When running multiple cases, the data of the last case must always be 
placed on tape unit 10 if it is to be communicated automatically to the 
RAMP or VOFMOC programs. 
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durinf* expansion (MOCTF=T). Case 3 is the required input format for 
creation of thermodynamic data for use with the RAMP program (MOC2P=T); 
a tape is generated for the equilibrium composition assumption during the 
isentropic expansion (MOCT=T). (The effects of heat transfer between the 
condensed and gaseous species are not determined.) Finally, Case 4 is the 
same as Case 3 except that the effects of heat transfer between the condensed 
and gaseous species are determined (PARTHT-T). 

2.2 USE OF THE MODIFIED TRAN72 PROGRAM WITH THE VOFMOC 
PROGRAM 

The TRAN72 program has been modified to meet the requirements of 
the RAMP computer program. The data tape (or file) created for communi- 
cation with the RAMP program contains additional data not required by the 
VOFMOC program (Ref. 6). For that reason, the tape read statement and 
format statement in subroutines GAS TAP and GASRD, respectively, must be 
modified to read the additional data as "dummy" variables. The following 
statements must be changed in the above subroutines before the data tape 
generated by the TRAN72 program can be read correctly by the VOFMOC 
program. 

• Subroutine GAjSRD 

Old Statement ; i FORMAT 1 4 A6 » 5X t A 3 1 6 X » 1 2 » - X ♦ 1 £) 

New Statement; i F0RMAT< 6A4 ,sX »A3 *6X « 1 2* 3X» I 2) 

• Subroutine GASTAP 

Old Statement: i O READ ( 1 0 ) t BETA (I)»l = l«4)» I OF ♦ I S 

New Statement; 10 REaU( 10 ) (BEtA( U » .4) »DU»DU* I0F« IS 

No other limitations are placed on the use of the modified TRAN72 program. 
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EXAMPLE CASES SHOWING THE REQUIRED INPUT FORMAT 
FOR CREATION OF THERMODYNAMIC DATA FOR TYPICAL 
ROCKET PERFORMANCE PROBLEMS 

Case 1: Required input to perform a calculation of theroretical rocket 
performance for both the equilibriiun and frozen composition 
assumptions during expansion. (No tape is generated. ) 


WE ACTANTS 

H c:*00 1»00 0*0 Ga98*ib F 

O 8«00 1*00 0*0 o 

(Insert Blank Card) 

NAMtLlSTS 

SlNPTi; 

WNT=T*PS1 A = T♦^A6t = 0000l »P=200«00 tOF=T»MlX=t>, 0 

iibiND 

iW^TINP 

Pcp=lu« *30* «b0« 4 100* *b00« « 1 000* «b000* <b0000* * lOOOOO* 4b00000# 

StiNU) 
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Resultant Output for Case 1 
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R esultajit Output for Caa e 1 {Cont 'd) 
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Resultant Output for Case 1 (Cont'd) 


-IflE.UKi;XJCjUiJ_im£lL£X KtJJf UHhilj'ICg. u SSumub £.<UlLIBKmfl CO HPOS iTlOW DUH1H6 £XP*KSltli< 


■PC • ^oa•o PsiA 

■ C 'Ahii > «< ! « • 1 


4 rtCM t J*- * X -C Jt n mil ^ 
VTflw'T» 1 C “ VHTSWlfc'R" 


rutu ft R*OOUX>d 
-oA I — a» a eBOw- 


*T FHACnON ENtKSY STATE TEHP OENSITT 
( S EE - H ^ T E I- CAL/^^Ol ! OEg «: i,/cc 


t •OOObO 
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a/fm — EjiUUU PEHc E hT E II F I - H .Z Ba? ., euuiWAiFurF WET 10 « t. 32 z 7 RE 4 CT»riT OENa>lTT" 


298. IS 


■0000 
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EltT 


-EJU-T. 


-EA 4 .T 


-EAJJL 


EMT_ 


EXIT 




EXIT 


-E-KlT 


EXIT 


T^ btO K 
HMO* 

H* 

-s» cal/ I 

hilt JiT 


I*OOC0 1.72a 7 10*080 3o*000 So»JUO 100*C0 S0b>00 it]00*CO SoOS*CD SaOOO.O <cccaa*o 
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• 3 -271.9 •lo&a*^ •tH6'i*8 -1837.8 -1SS3.3 -2268.9 -2*U3.6 -2681. S -2933.3 “2988.0 
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Resultant Output for Case 1 (Cont’d) 
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Resultant Output for Case 1 (Cont’d) 
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Resultant Output for Case 1 (Cont'd) 


TKAN^eOKT I'HOf’LKTieb Of KtlCUtT f ASiOHJNO »-><OZth CUfiPOilTlON 0Ut<lN(i 

0/l^« fe.csea PtHctUT rutL* t«>»2t.S7 t.umVALEI«t.E HAT1u« 1»3227 CHAWoEH PRfc.h&OKE»= i3«ft3y aT« 


-jfc»?p USiCvAlTJ -hPRAlflMJ^ li'TtteiAt tP„ p HahqTl 

CONU COnO COnU FROZ Mua 


uEo K FOlSt 


CAt/ICHM&tCI <K) 


CAL/tbilK) 


1J27«a 13'>6 7Zl«Xili-A lb2S»Aia-6 

1 J V ^-■ 

7 H 6 * IwJl* 

. - 304 ^*. 

b76« Hi6* ?*4o* 


• 7 o 3 J 


• *bV i b; 
tb 6 Q 2 


« 

• C J. *t 2 


» bo 3 b 

_• b 6 |,p 5 !,^ 
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Table E-2 (Continued) 


Case 2: Same as Case 1 except that a tape for communication with other 
• programs is generated for the frozen composition assumption 

during expansion (MOCTF=T). 

WEACTANTS 

H ii«00 1.00 0.0 G29B. 15 F 

O 2-00 1,00 0.0 Ga9B.lb u 

(Insert Blank Card) 

NAMELISTS 

»1NPT2 

HKT = T»PSlAsT*K»Ab£=0000l «P=20 O.OO»OF=TWviIX=6.0«MOCTF=T 
SEND ^ ^ 

STAPGtN 

iwead=i * io=a» iN=io 

SEND 
^ CASE 2. 

SWKtINP 

PCP=10, ♦3O.«PO.,i00. »b00. .1000. .5000. *50000 • « 1 00000* *500000* 

SEND 
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The resultant output for Case 2 is identical to that of Case 1 except 
for a listing of the data placed on tape for communication with other pro- 
grams. The following is a listing of that data. 
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i'iSf ■iriiiiriiivTii'r^ : -i' hi I N- itfiiiAi'riiinViS if-iAt'irTu' 
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■tsss 


xt;£- 


a cr3 csi ■■■:ss=3 :^ -:fs3 

Kesultaht: Output for Case 2 


I« V5 


— 


H02 


H2 


• ff 


• 0 


W20 


«4202 


•0 


OH 




-•ioooooo^or— - 

*5?6‘IA^B>00 


•BB6S25S-G2 
— *jtOOOM0404™ 

^♦^1*I3572-C|, 

• !iB652*iS^t)2 
*AC003Q&Aai 


hi 3*0 2 < 3 3^7 , 7. 1^2 5^ * 9 «| 0*02 

• 1026003*02 •0ftS7073*0C • |52<*797*!!? ♦1071697-03 

■ — ♦ 207 .4 g . tt0 i Cq V7 S 2 6 1 72*00 , > AToo B^OftCQ,. 


-*Kl09!*9*Ot 

•oonpODO 
. ,o^q92H7-Q2, 


■JnmuuiniL- 
•vuv w w 


■ AiqTlO^i-Ot 


»9S 17980-5?. 


i3J3»in8- 


.^e74-ta^ai- 


i4-2^&9-ail402- 


• 872S7?®*00 *1391<»89-0Z -•Z8*»67 1 3*Q3 

»-2S2 a378 »00 — ^^03^SB S«DP ■ — — ■&7008<I^M’a&- 


fboocoos 


.S9<»9376+p0 
„ •«] >l3S2Z-0i- 
.neiS?s5-02 
. - «&JI003Ca'»5i — . 

• 59101*I7*(50 
— : .ftl *l^.572iTf7| .. 


a3fc3.ff,ta*o:i. 


.78S?975-03 




..»ilS343aOJU)Q 
.8283030-53; 
— I .?O79R9B-0 m 



• fl22‘)ii l i+oo. 

..2S283 78*09- 


■ 857H3ft*0i 


•1031286-02 

-i.6o36Sa5*ao- 


>4.29.6.9 H 8 >02 . 


*.9«1«261>03 

_-Jv67008aS^S. 


4 2289»iO*IH. 


•0000000 


4000001^91 — . 
^aJiOT-lOEx^O 1— 

■ ?l«i6 1^1951 


aiBSa6*CH 

.78290 I 5*0C 

..>25 2.8378.03 


I ; 


.PBA9785-<I2 

. .iocroac*?!--- 
•pfiaiiisroo 
• A| q357>-Dt 
.PB*52«>-02 
■* AQ 0 POQA....01 


.9671126*01— 
•8318989-03 
■ — . 6a 3* S 65 »00 


-.-|^«499M03-4-. 
-.1322797*09;! 
.AZOOIiAA^DS.. 


420^22*04- 


*0000000 
..93092.92JO2- 




*A8Q7-tOSj«D| 


*272 1828*09- 


•88361 69+30 
.4183522-01.. 
.88457*5-02 
.. .609000?*y I — 
.5700932*50 
4183 S22.-HL., 


.57«8333-ft3 

*2a7958a*98 

,1 360919* 0 ? 


4i‘l3738*08- 

.7630368+00 

.2526378+00 

it8268<|ft*08 


-+9671126*01- 
.7878229-03 -.l8S9|66*0t^^i^ 

.6036S85*00 - .A7O08i)«-O$,^ . ,9?087 ii^ -*680^t0i-0t~ • 


■ 86 7 4-1- 3 6 *01 


. 129 6 2 8 * * 02 - 


.5098191-53 .7350936*00 .6822518-03 *.1620997*08 

—.202.8 58 a»04- — ...! +2526378*0 3 — _«:S034SeS *00 — ■ ., .620g *i^a|3| 


■j ^ o>nf_ 

^ ■. t ^ ■ w 


I 


w 




s 

tHi 

>+H 


I 

s 

p 


.8865255-02, 
6000300*31- _ 
•5693798*00 

.6183522-01- 

*8865265-02 

T*pp.yi*r 7 + j; 


• 272|82B-Ot 

*3722229-03 

.ynTneaft-ff,, 


1-1^03621 *08- _1*8574+24*04— 

.6698182*00 .8366798-03 

-287A878+f;-. + 


— •1296288*0; 

*.191«392+09 
— ,.. ->6 TQoaaaaOft 



•boooooo 

20.82.57.*;O2:- 


i48 2 4620*» l 


I. . 6 , 9 0 2 1 0 5*04^.; 


.0000000 

-.-930828 2-02,; 


■AJtitgJ4>5»lt4. 


-61260912-01 

•3182571-03 

-2029588-04- 


.+^536909*33; -852U26*01 -I— 

*648.7665*00 •3658572*031 

-^—-2526378.00- -6036565*0 th 


.«^^26988*b^-:■ 

•.2016852*05 

-6780858*0^ 


►2124824-op 


.S36SI87+30 *2136717-93 

- « 6 18.'S22»0I _.-— . 2028588-08 

.8865755-02 

. 60 o?arc*oi . 2721822 - 03 -- 

.8V63979.(J0 •M09j8S-r3 


.628861**03 


.6081972*00 
•2576378+00- 

-.0152506*03 

.5765368*00 

-7Eg+87a.np 


>»5 7|| . 2 * *0 1 




.2405928103 

- -.6036585+09- 


-.2t91046-*84 
- -.6700"44«es 


^4044-706.484- 
•0000300 
■^1 

4a88.2W«0l. 




^9900000 

7004»4-»-02-- 


i 

hM 

%*i id 


.PASS7';S-f37 

• 6??t?{ir*rc^o* 

,BPAS7«;r54.n2 


♦ tza82 53«:»^ >«?343S00ta*l 


•0000000 

„ , ?a0^7A7Tirty.,. 


- ,4oTs»y4*ai - 

.9 

— rT.*9i^0 S + 04 - : - i 
— +Aa9iyis*pi 'ij 

: — -■-■6>aTro5«pi , ’ 


•1360918-03 

,8887161+38 

.2078588-08 — 

«77?in28-rt8 . 


• 76?039f +03 - - ' -5571126*01 

• 5:726282+00 .1058432-33 

. .7526378.09 6036585+00- 


i 13969, p.02 

-*73‘^ 437 1*05 

* 6“*708 85-05 . — . 




.8*r»52 9B*?0 
-i.61.43S?fc!fiU. 


,899n98S-^5 

,-*2e25.53S+08. 


•6676l37«g0 


■Jtt82U2**Cl — 

•4590659-35 

.^■036585*03- 


1|794?83*« 


•I365823*04- ~ 
•OOQOOOC 
.9305747-02- 

*136975090t ^ 


r-f307495*0*-r— ^ 

— +A.807105+, 

,.l|A»8fl>|>2.. 




.•865255*02 
C-'lO -F,Sijo..'___l, 


.3 7 00-8J18+L'S . 


•OPOPOOO 

.8«B8787-D» 




- 4 - 



Table 2*2 (Cont*d) 


3: Required Input for creation of thermody'namlc data fp^ use with the 
RAMP program (MOCZP^T); a tape is generated for ihtr equtUbriiiixt 
composition assumption during expansion (MOCT^sT), (The ef facta 
of heat transfer between the condensed and gaseous species are not 
determined,) 


REACTM4TS 

* 





AL 1*0 



16* 

0#0 5296# 15 

F 

C H 

10#oev u #«:fo 

N *264 

12#04 

*-12000# 5SV0#t5 

F 

FCEtO O 

3#0 


•4 

-197300# S296*t6 

F 

C t>«lb H 

6#V7 0 1«17 

N .02 

1 #96 

-26300# S29n*15 

F 

N 1*0 H 

A«0 0 A#0 CL 1#0 

(Insert Blanh Card) 

O9#60 

-70690* 5296# IS 

F 

OMIT 

AL(SI 

AL4L) 

ALCL345) 

ALCL34LI 


OMIT 

AUNIS) 

AUN 

AL2CL6 

AL202 * 


OMIT 

CCL3 

CCL4 

CM 

CH2 


OMIT 

CH3 

CH4 

C0LL2 

C2CL2 


OMIT 

C2H6 

C302 

C4 

CS 


OMIT 

OMIT 

NAMEI.ISTS 

tiiNPra 

Ft(SI 

H20I&I 

FtfL) 

H20(LI 

FECL24S) 

FECL24L) 


MKT«T*P5I 

OOCTOi*P«b54# 

oo**»4ocfcp^ r *f^tuCT»T 




*&ND 

atAPGEN 

JO»a« lN«iO 

S£ND 
CASe 3 
awxTlNo 

PCPalO* *30t •eO« 1 100* ft>00« * loco* « 9000* *500004 « 100000# *500000* 
SEND 


2*18 


LOCKHCeO . HUNTSVILLE RESEARCH & ENGINEERING CENTER 









LOCKHEED ^ HUNTSVILLE RESEARCH & ENGINEERING CENTER 


'ca ■ 'O ' c= 2 ,.' .-'a- CP ■■ G±I C 3 - ‘ c± 3 ' ■ CP 3 


fiesiiltRiit Output:, for Case 3 


r— n cbssB' 


•>'V: / 

'C-‘ Kv, 

tVrr--r:;‘., >»;■■; 

f^MTT r-:. 

tt^\r ■ r 

ortfi ' 

o>n 'V.; ;v •• 

. ■■ ■ ' ; .. 

xt>:T ■■ . • ■ 

i 

r ' , 


^ -COCC^ 
laecAva 
!j*DOOO 


0 


■^gg.biL 




eCDOU 

WitV**0 

eG Otjp 


>0000^ 

•ODOD 

»GCG0 


JL5i*ti00p_ 

i2«o^sr 

««tnn c.: 


i A.Woo ,0 ‘ t.T7C0 h .OSCD .COOO " I • W 0 

t-cruD b ‘ t.dPti; cl I.OOUD , .CpC O ’ .itV^apOQ; 

»HP)* AULl ALCLAib* /“■ ALCtjllLI; 

„*«-Kt:5i ;i:,- -jiLil.-^: !L.„:„.,Ati^CLfr: :: 

.,ctL3 . '' • ccLA CK" : CH2 

gwa Cha _j - C3Ctj»-- ■ ' 


"'■ ■: • , "'• * 00 ^ 
^'i>i:20O0*doT 

■^t973G0 *o6 


_S, 

S 


29ie5l^C 

i98»lsQ 

298e!c^0 


F 
F ■ 
F 


*^83a0«G0 S - 29«e ISO 
.jr70^95^ti^S l:\g98. ISO . 


F 

F-' 


•oaooo 
•GqoCu 
e^pi:do ; 
eUCGCC 
■ •UGGCli 


C^Hi: . 
Ft *51. 

ingots V 


C302 

Fl20ftl 


C9 

t E G«.ijL5 L. 


vs • 
_Lfc‘£t^ua ^ 




^L 


INJ 

I 


vO 


rOGr«o00Q0£*00» 
»ITGtiOPGQnE4nO e 
eCauGOOQllE^QOi : 

■:e ^ 

jooDe^aoi 

*>qc*5 ‘iGaf.iQIli 

eGCJCGCPOPt^OG* 

.'cGTjcGnnoe^yQ, 

• OJCCCOOOE-^CCi 

• ♦(tC * 

-.« Ss C3 '*£J3 • V-,:, 
WGJC vCnfiOF^GQ * 

^aOliUuJr ripeL*li^__ 

• OGCOOinOE^CD^ 

• cui:io^udt^E>oO* - ^ 


DtiOOCOCCOti-OOt 

•OOOOCOODttPtljU. 

♦OGC0CO0G£400i 

eOQOOCGCDt^OOe 

rOCOOCCOOE^OOg 

jLPiicoccoa^feay,., 

•GCDOOCCCL^Oad 

euooocpccL*ca » _ 

♦QDOGGCCCt^GD* 
jOCCOCuCCt+OCR . 
WGGCCtorCL^OCV 
^ uc 0 0 Gcc t; t to 0 . 
■:#OCObCC:VCfc.+t!Oi, 
:.R:tCCOCCOCt^05ii._ 
•UGCOCCCPL+CCi 

• JtjQCCtQOdt^QCti^, 

• UCGCCCGret*»GP» 
-•LUCducGpCL>dq.R_- 
•nDdocGOCt^oo* 
iiCQDEJOQQdttOQ 


:>oQOCaocactpo» 
a oco opgp. t ica 
•oQCuoDdafc^bo, 
^pupOCOGOttOQ 
•DOcboODUE^OOf 
iOOQQ(^b fc>coA: 


eaoooocaai^oos 

Lpfi9D.o?gpt.too^ 


«DOaaoocu(K.*Dp» 
0 t?G ti c oog h ♦ p q t_ 
■^pccaodp.bl^fcue. 
J.bocOQcdat^pM,. 
eOaOC C£<OUt^CG * 
c L Ppvt 

. . DOCOSjCOPt^CP » 
u c u c ctpu t ^ c q . 
vceccccbbt^cdi 
• oooccoius^tosij- 

eCCdPCOdOE^GOt 


♦DOOOOOdOt^OOf 
• e oao oojaqjti: aq V. 
-cdbooGodE^oa* 
.ODOQboobt»odd 


•aooooQoot«oo« 
L^* 0.(3 pp oP 0 b t +p:cLi_ 
; :«QoooabQbt4>oo> 
-^^aopbopbctijQP-t- 
^aoOoOoqot^cot 
iL GdcaoaoEtCDi 


•tdoooDaot^OD 

e ocboobbo ttSa^ 
•GCLuonuattboi 
^edabOObOOttCOt, 
sUObOODa&t'^PO* 
f q G Lo D atrfTfe: ♦ bo . 


.ocoOoqQbt^cq, .GDOooaucttPbe 


" > 1 1 
' sc,r 


■A -:. ^ 

^ p 


-^•L, -JS 


7.-- ,:-■ a;;: r'- 

A.-' F 


" ♦Du£iCOpOi;iF^CO * 

♦ O'utf Coorit-Rt'^fj 

■ . 5 bvt . 

♦ afjUi:Oran|?L*rn * 

..•at I'o c: u L* ad 

iourr‘ra?:ci*cc» 

.•Si»C C E*t O i . 

♦ ccjc *‘Dq^>otDa. 


*?JwO' ^ t* "0 P 


*UOCCeDtOL^OO> 

•accaoabGt^oot^ 

•GOODDDaDt^aCt^ 
• tiCCUPCOl fc+00 * 
LT u CO a cdkta Os--- 
.UGOOGGCOt+UOr 
.' •ucdo:'C*cct.*oc»t 
/bCLOOf. raDt^do, 
eaGoCr-.'ract^Oo 




^DCOUD C OOE*CC. 


iggP0QPJiLG£.t.9a4 


ROsouQodaL^oai •oa(iDOD0Dt^bG» 
:jtBbpbOC(}bfctCIl4L^£ijj3a^^^ 


^ > CO cb ca c«t *0 Ur „ 

• CE;CC*,3a«t*00. 

— (,bo t-tdiu. 
.OUQtiOdaUii.*OQ« 
.coocooeoE+oCi„ 
>OOCCGt?utJE^C0* 


>bOdDdPOQttCb^ 
• acuotjoccE^oo* 


*oouooquot.*oov 

^•.OOMOGCiDot^POs- 

saGuOODOOEtUO« 


S> • 




• :j.:-jjQabCLvoo. 


LOn^KMEED- HUNTSVILLE RESEARCH A ENGINEERING CENTER 


L- 


ro 

f 

o. 




Resultant Output for Case 3 {Cont^d) 


Tr* 

■b?L, 


• OOCCCOOCJt^COf 

•ooudcqooC>oc* 

»dQQQCa3Q£^a0t, 


sOCCOCOCCt-frUOR 

.«OCOOCOOOt*GC* 


• CwLCOCCUt+OOt : >DOOOCCOOL+OOV 

• DOOycOCSJc^OO i '’.OODOODobt^da t 

• □COU0OOOt^OC_.._;_ ^ 


SP 
TV 
c • 

SHf.C 1C 


F 

F 

F 

F,. 

T 


nt TN 
fjn*" . 
cx 

50 : _ _ 

so 

JQtS 

JDt 


f 


«ouoqoGooevoo 

^jJOcjqpcpqEfog, 

oOUDCOGOOG^ob' 


T'tACE 

tlhKli 

Eu^-ns 

TGbSFT 

.F 


» . 

at 


♦ 0 

• P00C60aD£fQl3, 


T - 

_£ L 


FUaCm 

kOEjATA 

OiF 

*I0CF 

^'UCT 

Pfi^fTHT 

ooorr 


F 

.T- 

r 


F: . _ . 

T 

^ : V-. 


T.. 

F 


•OOCDOOOOt^OOs 
. laULCDflOQEjtOilA^ 
«0DaoQtiOD£«OO» 
_..ilDjaDi)Xlil2iL±niU- 


•OOOOCOOOt^OOt 

.»aOjQCOODdt.«:QO.i 


•oaoocoooe^oo, 

-j PC PpoQOi;) ^0^ 


•00000000£*QD« •00000000^*00# 

^jmQBOQQfl.L >OD^ wQOQDqOOOg^OO , 




«DLonG()Of3ErQC^« • OCOOOOGOi^OO • •ODOOOOCOE^OCJ # 

i:„ _ •OLooocioae^ogV^^ •ppcQCccpEtPOf ^_tPjpga.oGputi 

• GGOCOOoaE^'OO* •UCCOdoCOL^OQ 

.■_ . ■ , ^ : 


•ooaQoooof>40o# 

^•^ojpsooo^gkiooV. 

• 00UQp0fJ0£+00, 

_>_qQPDdOooti*oo, 


.boooc!»aot+oa# 

_;POOOPODO £*U O^ 


L^PT? V4XOE Give Fa» O ff FPCT 

f TApGFM * — 

ikEAy. . m ,1. . . ;•.. . ♦!_ : ■ ■ ■■ 

10 . ;. • : *>fi 

IJJL > 1P 


si >10 



AC 

J 6/A3 

>LH 

J 0/7C 

«i-CL 

J b/Tz 

^t.cL2 





_£LOCL^ 

jUVt.7 

aLoh 


f^LD2 ■ 

w A/;y 

AL20 

J 6/77 

At/v^isr 

J »/>7 


j J/^I 

iiTo" 

ji 

CCL 

J12/6H 

tCL^ 

**' J / ^vJ 

OUiJ 

■V, 

f .^ ■ . ;/: 

M ? / 


J V / f s 

cc 


COtt . 




y 6/7fl 
.VV2/AF 
V i/ 6 I 

‘c; fc/'Arfr'': 


ALCLJ 

t 

C7 


fisa * CS3-— CS3 CI3— ^ 











»liifnfihiiif«itiii^™i%ih 
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tSSS : £S^ G3 £!S^ ' 


Resultant Output for Case 3 (ContM) 


w 9/^6 ^ 

_ 

JJ ?/70 

j 1 7/ > n 

j 

J 

t 7/69 
J 9/65 
12/6 9,, 
J J > / > □ 


C20 ' 
JCL02 
rccL2 

F£0<L| 

ftZCLH 

. HCL 

HN02 

H202 

.NH3 

_!4fiA 


J_ 3/AI • C2M2 

JI2/69 .C3 


. J . 9/65 . Ct? . . — 
J 6/65 FeCL3CS» 


J 9/ AA F£P 

J 6/65 FE20345) 


_H2/69 .. MCN . 

J 6/63 HN03 

„<>, 3/6l._..N 

J 6/63 NO 

J 9/6S N2 
J 6/62 0 


J. 9^‘S 

■ J "6/72 
_Jl«/6S, 
^ ' 6/ 65 

J 6/65 

.aU2/70. 

tt 6/6N 

_!»I*7T0. 

ji 2 / 6 S 

J12/6S 

J12/70 




CL 

_SL2.g 

FECL3(L) 

FEg2h2tS) 

FE3CNI5) 

hCu_ 

"hCI2 

NCO 

NOlL 

62>iN 

OH 


J 3/6 7 

J 6/66 

_J. 3 /. 6 SL. 

J 6/65 
>4 12/66 
J 9/65 

J 3/61 

«l 9/66 

>>I2/6«| 

*4 9/65 


C2ti 

Cl.CN 

■ffc 

F£CL3 

Ft02W2 

H . • ■ ■ 


J 3/61 

i~6/61 

LJ. 6/65. 
J 6/65 
J 6/ 66 
J 3/69 


HMCP „ 

■.V-;.',. 3/63 

hWO 

H2 

■J 3/61 

hZiS 

f^H 2. 

J12/65 

MHZ 

No2 

.dl2/65 

UtiZCL 

ti20 ■: 

J 9/64 

llHzoM: 

02 

J 6/6i 

03 


A 

- f 

n a y T : 
<■ JL 
f- 4t: r 
AH 


t.703« ' 

tn « Si J 

?cp‘ 


List or C0N0tli5Ei)' SPtClES FHQH SVakC’h ‘ 

Ai.203.lU ^CSI . - - . il.CL3|S). FEvL4lU_ 

FEOtLI Feo2H2(S) Fe03H3(S) FE203CSI 


JKCf. 


. _.«.0-OQDOtlOOE6£UI*_ 
.QOCOOOOOC+OOi 

t5»uorj?j:m£.tJlP.ju, 

.OUOCOtiOrjC.'t^CO 

.o«cooopqr*ot?f- 

.OuOqOORUE^GO* 

_-....0O0da5i0PE*03,. 

.auocopoo£<»CD 

.• ‘ LT.(JUpt).iE to? t_ 

.5uctJC-0onE*C3 • 

• lbOt)D(ionE'»p6< 
.OOPSOOOOE*OOj 
___»CP0000D0£ *00 » 
.OtiCC0aooE*G0« 


..QQOQQO.COL^PCr 
•50000QOOE600i 
.oitrtncnnflF . 


.jQOOOQPOOEtQfl*. 

.OOOOOQOUE^OOt 


. .OOOUCOOOE»OC. 
• OOOODQOQb.«00» 
*cooooooaL-»oo. 


•waaoocooE^aot. 

.UOOOOCOQE*OOi 

..ooooPoqqitGq.,. 


..oq.Q.QooDqc.'tgot. 
• oaquoDOUE^-oOi 
*5 c_q a ooo oE*Qo t__ 


-t.Q.o.o.Cp.oq.QjE*gojL. 

.OOUOOOUOL^OC* 

-«o goDP P.Q OE»oa « 


,30000000 E*Q2> 

•ICOOCqoOE^OHt 

.•50OpOOOOF.*O.6,_ 

•oooocoqcE*oOi 

.•tioqocooqooQi. 

.QCOOOOOOLtOO 


■ s c 0 I)D00GE*02. 
.5ocoQaoofc-»09» 
.D OOOOCDCE*'OUi 
iCOOuboOdE^OQ. 

j.oocooog.pEio,o^. 


«iDODOOOD6«-03 . 
.50UOOOtiOt«O5« 
qOOOOPP.QE ♦O0.,_ 

>ouuoobo‘oL-»bo, 

..goooaPouttoOA.. 


.rtftnono.. 


-JUtIJi AUP.9 ^ 

KO-HOl MOCK K»/AC 


EFFtCTIVE FUEL 

HPPI21 

*.2?32i037'»03 


EFFECTIVE OAIOAn-; 

hfpiii 

•ooquoooo 


hIature 

HSUfl.t 

■«22321037603 


kG-ATOpS/KA 

Al 

c 

e 

0 

N 

ft 


ttOP<t(2> 
,59299e90-C2_ 
*9911 2669”02 
_j^7C66 32S.-3L. 
.2933t5fe5-0« 

.6n396372-0‘* 

»ti9239H9B"C2, 


B OP 1 1 . n 

jOQOagooa 

•ocODoaob 

■ OCOUdOOO 

•flOOdCOOO 

• □oooouou , 

•oooodooo 
•oooouooo .. 


fO( I » 

J.J9299890-O2L 
• ?9u 2869-D2 
«3 7 Daa37V»Ol 
•2^33l5aso0l 
_»6<!*»‘»5379-'D2_ 
»S'la9«372-P9 
«S^23999e“02., 


-l3«/9n -T1»960 

rl4?3.9g. 


H . .. 0 N__ 

• v',q6J -|9*'.79 -I3»305 

-9«'tta •"I3*bl5 


Ft CL 

•11 *197 -21*95/' 

•15*216 -20*29/ 


l/tOOO 

a *000 
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Resultant Out|hjt for Case 3 {ContM) 


THttihe.1iC*l. P£KfOKhA:^Ct i d« fUH J U OH I fitPASsS t »>, 


f C^j« 

CnSf HO 


SSt»H«0 PSlA 

« 1 


*T ^^tACTlOh e*-tliCT SlAlC 


CHemcAL r 

.At ..tjlDOOCC^ 

c &<eBAuo 

C. 4 .ISOUO 

K 1 <00000 


On^^UtA 

H ;o«obvod 


s27S04i 


t;e4H00 


H A. 970 CD 0 1*17000 S * *03000 

H A,CQ OOO 0 A* COoOO C t I * 00000 


tS£i T^oTt 2 

*iAaca 

•12U‘*0 

, ■ , r.gg^Ofl-- 




CAc/^C,, 

*GcO 

*l200Q*0nU 

*i»73on*0fi0 

*2e3eo*0no 

--70Av|j.OQg_. 


Ttt«F 
OLfe *c 
2?9*lS 
2 ?S*I 5 

2ya*ts 

2tS*U 

29S*1S 


i^CC 

*ca-o 

»COwO 

• OOuQ 
»00O0 


J^ooqo r fctClNT fg<L»tOO»ODOO fcomVAtEwCC H^ llOm I*s » y7 sCACT^hT J?€ Wll^L 


^C/F 

p* M:i ^ 

f, 0£0 1C 



S, 


K_ 

4.0000 

_3?*A.^7 

33?l 

1 * tf b * 3 _ 
*-hH 3.4 
i*3.00V. 


THkOji? 


H, HQL «f _ 2B*30H_ 

(DtV/OiPir «I.C1S7S 

r .^JOLliJE i*3:i31 

. CH /jSMUJ *8S9/ 

V- f 5 j _ I f 4 3Ai. 

<> V£L«r./SCC 10*4*8 




lSi^% 


*LH„ 

AtCt 

-LCt3 
*1 f; 
«LOCt 
A t. 0 4 
*i.02 


.OOOJO 
mOQOOl . 

«goho» 

^*QQVia 

•CCOJ i 

•dCol I 

*t0l^7 
♦CCC37 
• r,DOG3 
.etc A? 


*L JO 

.COCUi 


•Q7 jS* 

r •: 

• 3 3 ut) 1 

■^-Ct 

♦ rGijpi 

rt? 

<G l* l ^ 

> 

• CU y**-.. 

.. 'j 

• dC n i 




ra TO TO TO TO CZj To .c: 
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PC « SS^tO PSU 

woOTP m 106*0 {KO-HCLICDCO K}/kV 

CASiC-liOr 1 ^ 


AL UOOOOD 

C — H - IO ^ O®^DO - 0 -- “-» T 7 ao 6 H r 24^00 

F£ 2*00000 ' 0 3*00000 

C - -4»3&00a H— 4»»700O 0 4^ 706 0 H 1 0300 0 

1*00000 H H*C0000 0 ^*Q6a00 Ct 1*60000 


6T fraction CNCRor STATE Ttnp OENStTT 


•16000' *000 

♦ 1 20%0 » 1 2000^000 

• 00*100 7300 *000 

-• 01 T 60 « M 400 * 000 ^ 

• 6 P 600 •TOAfOtOOO 


2ft*lS 

2»»*IS 

2Tt«lS 


•0006 
-•0006- 
•0000 
*6000 
• 0000 


PERCENT rUEflOO.OODO EWiVAuEhCE B«TIO- I.A»77 NEACTANT SENS|TT. 


CNAHsER throat 


-r ” 

^ CaL/«CM.« 2.*m ».«»■> -LtMA 2..TS6 2.8*8* 2.B98* 2.e,.* ^.**8* 

“ «. «oL »T TiTir* 20«'o*8 *0«7I5 2 Q.*oA 20»’8« 21.038 2I.C73 2I.Q73 21*078 21^138 2l 8At 


1.823A 1.3380 I*Io77 J.O^S? UO^tm i.fl238 I.o002 


GAPHA C$) 

-SON- M EL*H/SI^ - 
PACH NuHbER 

AE/AT 

C3TAR, PT/SEC 
CF 

> VAC-.L«*^E«V[^ 
tSP. LB-SEC7LB 


.*7T» 


• ,Jt392_ 


ivii^s !u;» !;!5!: i:;«! - «r ■ 


1.000 


2.J88 2.731 


3«C08 


3,388 


8.332 


8.800 


S.87I 


7.781 


8*433 9*»i7 


1.0000 2,2888 8,b3ij3 A.»S18 11.502 27.5s 3 *3.107 2t7*«* 1331*23 2817*42 7774*28 


62 h 8 4288 

.6*8 1.269 


• 127.8 


286.S 


-*288 
1.880 
■3 18 , 7 . 
287. S 


4288 
1 .5S7 
-3 27. 3. 
302*3 


- 428 a - 

1.68S 


- -4288 
1.795 


3i7.3 388.4 


*274- 

1.883 

370.1 

357.8 


-4288 4284 *288 *284- 

l«*27 2*C08 2*028 2.0*0 


378*3 


347.4 


373,0 377,7 


pole fractions 


AL 

A1.H 
Ai.CL 
ALCL2 
— Jrt.Ct-4- 
ALO 
ALOCt 
ALOK 
**,02 


_ ji 84 c 2 J _ 

*00002 

*00889 

«00i IS 

-*-80094- 

*00022 

*00158 

*00083 

•00005- 

•00064 


*000; 3. 

•oooot 

— .00851- 
«0012S 
— -. flOOff *- 
•0001 8 
,00171 
.00081 
— .00008 
•00048 


_ iOB 003 _ 

•00000 

-.00800 

*00172 

* 00 0 38 

.00001 

.00207 

*00028 

*00000 

•00054 


_*coooo._ 
*00000 
«Oo2*o — 

•O0Z44 

-• op i a I ■" — 

•G6O6G 

• cola t — 
* 00 c I 8 

• 00000 — 
*03033 


- AOOOJJO . 

•OOQOO 

-.00155- 

•00256 

■ . 00 373 
.00000 
•0CI24- 
.00007 

*00000 

•00017 


-jP-M-Bs — tsasm — *110090 dmaao- *99900 _ .oeo ao .Boaca 

•00000 *00000 *00000 *00000 *00000 *00000 *00000 

*00000 *OOOOOt *00000 * 00000 - 


•00181 .OOOQ2 *00000 *00000 *00000 *00000 *00000 


*00000 *00000 *00000 *00000 *00000 *00000 *00000 

•00081 .00000 *00000 .00000 *00000 .00000 * 00000 - 

.00002 .00003 *90000 .OOOOO *00000 *00000 *00000 

.00000 .00000 .00000 - .00000 *00000 -.00000 *ocooo 

•ODoos .rcooo *00000 «ooooa *ooooo .ooooo *00000 






mtmmutd 
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-'CWCMOACaMWAci 


- ■■ : 


ra k;s 3 iss: f;z:^ tr;:z 'czz: nr: cr: c 


cz ^ c — cn rrn r~n n*n 


fiesultant Output for Case 4 (Cont'd) 


CQ2 

ca»^- - 

CL 

cto- 

CL« 

~n 

PECL 

FtCLi 

fCO 

FE02H3- 

Ft2CL<» 


—jjLQfiGI. 

• amo 

— ♦aooQj 
•aiAoi 
--•08000- 
•ClfS? 

- •00002 
•00003 

rOCO»^ 

• OOOO ^ 
•OOCSl 
• 0000 * 
— -•OQDOl 

•coooo 

- ^CBIt| 

•13S22 

- *00003 
.2*816 

- .i«H*7 
•00002 

— rOOOOi — 
•00001 

- *08001 
•03129 

- . 0 O 60 & - 

•C019S 


• OO OQl .80001 

.2^253 .25|30 


-•-fiflS-M iOSasa tjmoa »OaOBe .oaoo a . 00800 .aoa aa j,^qq 

• Znf&H *297« *39301 *2202V •203SV .tSU^ •0«nR •Q«819~ 


.01732 
—.80000 ■ 
•013S0 
-'.0000 1 
*00003 
— * fl 006 S — 
•COOOS 
•00D6S- 
.CQ08S 
-.OOOOl 
•80000 
— Oiiaia- 
.190«* 
•OOOOl 
.27399 
.19928- 
.00001 


, .02l7S 

- •oooee- 

• 08«31 

-.oocoo 

•00700 
" . BO O 1-9- 
•00001 
•rol2H 
•00701 

• oocm 
•cooco 

-*83-'-2^2- 

.l&HCO 

. 00000 - 

•29220 

•l*)7a- 

•00000 


•02*03 

•80000- 

• 000*9 

4DD0C0 

•OCOCQ 

“-♦OOCf-2- 

•COQOC 

• OOl 

aOOCQQ 

•ooooo 

•GOOOO 

-^q238 

•OOOOQ 

•3q2S7 

• I6U3 

wonoco 


aOOOOl *00000 *00000 

■ OOCqI *00000 * 00000 - 

«OC07ft *00007 *00000 

-■ 0 B 7 h ^ * 09 oSS * 0^1 

t00lo3 gOOOO^ *00000 


•ozaf5 

--*00000- 

•00033 

•cocoo- 
*00000 
--*00004-- 
*00000 
* O 0 MB 
>00000 
*00000 
*00000 
~»0009Q... 
*1^140 
•00000- 
*30791 
• 1*029 

•ooooo 

-* DflOQO 
•OQQQO 
-*00000^ 
•00000 
-*09|49— 
*00000 


*03423 

-->00000- 

•00007 

•ooooo 

•OQono 

-wOGBP^ 

•oocco 

*00140 

•OODOO 

•00000 

•OOOOO 

- ^0 00 19 

•144S0 
-•OOCQO 
>3i4J4 
-• IS*90 
•OODOO 


*0S74t 
— * 00000 - 
•OOOOO 
-*00000 
*00000 
-■ * 0 0 000 - 
•Ooooo 

•00140 

•DonoQ 

• 00000 - 

•00000 

•nooco- 

•143*3 

-•ooooo - 

•34103 

^^13449^ 

•00000 


•0741? *12440 *10774 

— rOOOOQ — -^MOOO ♦OOOr t- 

•00000 *00000 *00000 

-•OOOOO *00000 *00000^- 

•ooooo *00000 *00000 

— * 000 0 0 »OO OO0 — .„ *00000 

•ooooo *00000 *00000 

--•00140 -*00142 -'*00003 - 

•ooooo *00000 *00000 

-*00000 *00000 *00000— 

•ooooo *00003 *00072 


•14342 
- — *OODQO 
•3577S 
-^•U77f . 
•OOOOO 


•ooooo *00000 *00000 

->OQ0OC *00000 *00000- 

•ooooo *00000 *00000 

-*09200 *09 Z 1 4 *092 J 4- 

•00000 *00000 *00000 


•14342 *14403 

-•OOOOO — *00000- 
•41001 *44920 

—*04444 >«004 1 7- 

•00000 «COQOQ 

-vO OOOq < 00000 

*00000 *00000 

-tOOQOO *0006^- 

*00000 *00000 
~* 042 I 4— *09241 - 
•OOOOO *00000 


•20302 

^00004- 

*00000 

•00000 

•OOCOO 

•OOCOO 

•OOOOl 

•00003 

~«OO00D 

*00075 

^^onnftfi 

•14425 
•OOCOO 
•44»20 
-•00422 - 
•OOOOO 
* * 008 00 
•DOnOQ 
-*00003 - 
•OOCOO 
-*09)02- 
•OOQOO 


*00080 

«oi«sa 

.*3739 
— *8>*98 
.00089 
■•03989 
•00 980 

— .oftaor- 

•09003 

•300CC 

•OOQDO 

•08009 

•80878 

-*ngnna 

• ISlVf 
•00080 
•94I2S 
•80373 
•OOOOO 

*00000 

*00004 

•ooooo 

•07744 

*00000 


^gPQ** * .0002 * .80001 ^00000 *00000 .00000 •ooeeo iiiioi ^soooe looooT 

6001IJ0M6L POOOWCTS »„IC^ OER£ COwSiOErEq qUT «m 05E HOlE FR6CT|0h5 «CRE LESS Tm«N .SOCOO-H FOR ALL «S8|s»C» COMDlfiONS 


PCCLS 

-ROCt — 


. _ —^0 

note. 6E18HT F«*cf|0»’8f FUEL lV'TOT*L“>UELri^HO OF 0*16*01 IH ToTrL Ox|o«NTS 
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BEPEODUCIBILrrY OF THE 
Opini NAL PAGE 16 POOR 


r 



' I 


r^esuitant Uutput for Case 4 (Cont'd) 


3577 

3338 

z%ys 

fJi --^ 79 - 


M 


173 & 

1739 

ICA 9 

..yit 

^92 


* 4&8 



»/f« .0000 rcbcent roEf 100.0000 EQui V alence RArToi iTiV7r 


CKaNOER RRESSVRCs S7.AV7 aTM 


T£HR viscosity 


OEO 


NONaTONIC 
- CONO- 


internal 

-eoNo 


frozen 

COHO 


Reaction 
CONO — 


EQOILtoRtUN 
CONO 


CR 


RRANOTl 
-FROZ- 


LERIS 

-NUNRER 



VAA«X 10>6 
VZO* 

773. 

A7A. 




sXS.AlOrA 

N9I, 

3SI. 

32 A< 


*»NB.KlorA- 

<f 2 H, 

■3N2. 

2 BZ. 

- 2 S 4 m 


983.X10-A. 

915. 

723. 

BIO. 

-SAA. 


-27Qt*X|0>A. 

2216. 

-733. 

20N* 

- tlO . 


3a8N,X|0-a _ t^7»7_. 
3131. .N7S9 

.NA13— 

BIN, . 4 | 4 «f 

— * 7 3 , .AN AB 


-IjJaH. 
1.05*8 
-.*758- 
• 55N7 
—. 528 3 . 


-*5710. 

•5783 


-▼5*35- 


.5*71 

.**>7 


_.3«57 
•3075 
-»S*05- 
•5521 
• 5 * *3 


*.♦ 3,7 
<•0181 
-^•|* 0 «- 
I * 5**2 
- U O O OA- 


SI 4 » 

2 « 3 ^ 

22 tf 

505 . 

M 9 . 

S $3 

*♦ 53 * 

— 230 . 

ISt. - 

3 * 1 * 



* 108 * 

211 . 

t 28 « 

337 , 

27 . 

38 Ai 



— 1 t 8 - 

— 9%^ 

* 7 -»_ 

12 1 ^ 


229 * 

137 . 

6 «* 

203 . 

93 . 

—519 

297 , 

2 l«t 

12 *. 

62 * 

- 1 T|* 

- 377 . 

5 * 7 , 

191 * 

’ 13 . 

5 - 1 . 

187 . 

222 . 

389 , 


• 5331 
-•5095 

•5957 

•5392 

• 5955 

.•5871 — 

•5157 

^ *4i27 

.5002- 
■•3B52 

*9970 

*9BSC 

•5979 

^ kA* * 

— * *&41 9 
• 4739 

«37q8 

*7|S3 

• 5177 

•5530 

• 5923 

-•3**0 t-.7t3f 

*51 5 J 



.35M 

U198S 

• 50*9 

• 

•5*55 

• 9^3^ 

• •5952 




|:«M[)KNb 3 




MliHiSi 


aManaM >5 
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Resultant Output for Case 4 (Cont*d) 


c;p-J’'P T£3T rtS'i 


1>» IT 


•*7M3TJA*03 .__ 
•«fitl33*00 
_ •fujaTTt-OA 
.7031177-OS 


_j37**732*02 - 

.*tS*3Pie«-03 

— ,2213I7|»00 
.3396?7S«00 


♦i2S2o2S*QS _ 
«f3TS^iT*oO 
— .SASAIZS-Ol- 
.135S033.00 


»Z3Ll.*»7*tPl_ 
• <(02047 1-03 
-.43B4324-04- 
• 3li( *1740-03 


_tZJ0»l«l*07 
• •7S43744«’a3 

.1*1205*0-02- 

.7201422-01 


• lr737t3*0l . . 

•73$727S«g3 

— ,2«|tOS|-07- 


*9000000 


•|4344*2*08 


•7777207-00 
• 7*t3i 174-02 
*7743431-05 
■«734373I*03 - 
.5575747*03 

-5 727347-02- 

.137C77B-C5 
>.7543734*03 - 
.4757377*00 

- .7701081-02 
.71177561-04 

-.2543734.0-3 — - 

• 4357320'<00 
.7434150-02- 
.233HQ42-04 
..7543734*03 
.4127097*00 

.1003293-01- 

.4747314-07 
••7543734*03 
•5745525*08 
-- .1073554-01 
.0000000 

-.2«43734*oa 

*5302512*00 ' 
*104l4So-Oi- 
.0000900 
*.7543734*03 
•5174374*00 

.4117204-W- 

•OOCUQOO 
*.7543734*03 - 
>7290227*00 
.1202437-01 
.0000009 
*-2543734*02— 
.375|44o*00 

— . .1227770-01 

.0000000 

..7543734*03 

.3327587*00 


.7147451-03 

— .2075774*00- 
.3537274.00 
♦3747732*01 ‘ 
•3247478-03 


■ tt774739*00 

.7034407-01- 

.1217255.00 
.787 7334*03 - - 
.4977570*00 


•3737105-03 

.2444412-01^ 

,7143477.03 

.2314474*01 

•3^72527-03 


-.4222737*03 

.1310753-02- 

.7177340*01 
-.2114057*02 — 
-.7720354*03 


.7357274*03 

-,8337577-07 


•1734445*00 


il2l9012*0[ - 
.7357274*03 


r^2|72553*01 


.7031337.00 

-.1254577*01 

•2731151-03 

— ,1071 182.00 
.7173225*00 

. 7 537743*0 0— — — 

*2Bo8S27-o3 

— ,4584443-01 

.7150332.00 

-.3747732*00 

•2451319-03 

,5547441-01- 

,7137145*00 
.7537747-01 -- 

.2272765-03 

.1145657-01 

.3742703*00 

—•2747732-01 

•2084587-03 

.3377557-02 

•3777937.00 
.7539743-02 — 
*|442974-o3 


,7o9B577-oi 
-.481740«-03 
• |3i7709*oI 

.1604201*00 

.5507357-01 


,9777192-03 

.23(4474*01 

.5973275-03 

—.7048473-02- 

.1224871-02 


.9212702-01 
.21*473**02 - 
-.1074507*07 

.1203494-03- 

.9722703-01 


hi 159792*01 - 

.7359278*03 
- .7004134-03- 


>2430073*01 


.1777747*00 


• |7*i4774*ol 
— .1743354*00- 
,5|47409-01 
•4 o 6S457*03 
>l7l7|2Q*0i 


.4347527-03 

—.1342715-01-^ 

.1252014-02 

.2314474*01 

.4119194-03 


-•1077334*07 

.7447923-07- 

.7553427-01 
-.2270571*04 — 
•.1115774*07. 


•7357278*03 
— .7»2*777-0>- 


♦17*8545*00 


tn50021701- 

•7357274*03 


-•1724572*01 


.7897443-01 
-.7797340*03 ■ 

•7039898*00 
- .2243195.00 
,5575718-01 

-.-7535921^*02 

•7*78053*00 

.4775432-01 
-.3431751*03 

• 77430 * 7*00 


.1270977-02 
• 2314474*01 - — 
.3754427-03 
3777175-01- 
,1717727.02 


.7733774-01 

-.2332724*02 

-•1193034*07 

,7775039-05— 

.1010424*00 


>^11*7414*01- — 
•7359274*03 
-.4140748-03 


-.71*1414*01 


-•{549878*00 


•3127428-03 

—.9041220-01- 

.3011109-02 

.2314*7**01 

•3225403*03 


•.1220*97*09 

—•1119*47-0^- 

•lO27**5*0O 

.-2790*73*02 

•.12793*0*09 


.7359298*03 

—.*321213-03— 


-.1*17777*00 


>^1«7*37*oi — 
.7357274*03 


8**|7*0i 


•3q47243*Q0 

.7539.43-03 

*1247152-o3 

.47274*2-04 

.18410*7*00 

.J349732^C3 

*1 I455i7-o3 
.1513277-06 
.1521938*00 
.7537.47-09 
.77o7475-c9 


.124127**00 
• 2*2|073*t)3 - — 
• 13 | 2575 *oi 
- .17770^**00 

.2090144.00 


,lOS900S-0l 
•2314*74*01- — 
.3*47412-03 
.7437795-01 

. 3777743-01 


•10345*9*00 

» 24**000*02 

••l33093**07 
•0000000 -■ 
.9741437-01 


>l.l«9«7t*0| 

■735927**q3 
. ,7733*31.03- 


(t23**7*0l 


.1432537*00 


. l28 '/=-£-0l 


o623«127-Cl 


• i33<|S68*0S 

oiffro7es«Ga* 

. •I2|7lfl7*0i 

.20Q2?l9tCO 

»2^2ia3l*GG 


^•®3l57o7-?Ol- 
*&4|S7U*oi 
*231**76*01 “ 


—*0000000 - 
,*3Ma24*0l 
►2»«3J2*^02 
•• l3726S|*o^ 


»i|3S*2*«6tl3 


-<»it73SflC«0C 


»ll332V7*ot 
• <l3S924t*fi3 






aOOGOOOO - 

•77315?*-Cl 


• lOnS64*02 
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Besultant Output for Case 4 (Cont'd) 


J“ 2 » 


37.7 

ALCI. 

Cflt - 

H 

SH- 


--,C -■ 

*UCL 




HCU 


— • 0 - 

ALCL 



HZ 


- .0 
AtOC 
-re — 


-»o- 


H20 


At. OH 
-Fect- 
NH3 


• 0 

AL02 

SC02 

NO 


■ *« 
CO 

rc 2 C 

M2 


*0 


• 0 


• 0 

-3 


*0 


H - 
M2 


Cl 


-.I6021»t8*02 


*37*7732*112 


*2523577*07 


i 2 *A| 502 *gi 


« 2 n 73727 *D 2 


*1237515*01 


..yOCaOBatL 


•7582123*00 
... *17*03*8-02. 
•2277352*01 
.2773377-02 
.2873730-33 

r**0227ft*93 


• 752 * 580*03 

--•337*177-02- 

•OQOOOOO 

-*I517707*C‘0- 


*5351737*00 
, 27 o 3 oT 7 * 02 - 


.•770777-03 
_,72SJ 732-03- 


.••0*887-03 
.3002301*00 


• lZt* 7 o 8 -o* 
rlA*007o*00 


-.1*0277**03 
-..•1205783-03- 
.1775723-02 
- — .1731272-07- 


•735727«*o3 

-.2517351-03 

.*137732-05 

•1127*75-07 


.253173**00 

•3*727*0*37 

•7i5277«*ot 


CO 

ut 

tS3 


- - t9hS2iJ6-53 

• 5 ^ 6022 **® 

• 77 A|« 2 «**CS 

• Ib 636 a 9 * 0 *« 
* 2839799 - 0 * 






i 22 * 07 7 | * C 7 


■ a * 1 l 50 ' 3 *01 


.*755273-03 
.2751738-02" 
•ODooceo 
---* 1770780.00- 


.5127021*00 

-*7737757-02- 

.3335506-03 

-*3050812*00 


.7270353*03 
—**011^32-03- 
*3i8l722-05 
^— * t* 5 o 883 * 00 ~ 


■ 2077 7 50 * 02 - 


'.2730788*03 

-.SS 5 o 57 *» 07 - 

.17*7880*02 

-,178*027-07- 


■4**+*04*at 


. 7357278*03 
-*1286052-03 
•2773811*05 
-*2222073-05 


.2515057*00 

• 737 io 76 -o 7 

.7180I36-0I' 


*5732772*03 

--•1*62156-03- 

.0000008 

•I73*173*08- 


■■• 15* 8 77 8* 0 7 


•7737*81*00 

-*7217356-02 

• 5523370 -GS 

—♦ 3218208 * 00 - 


•» l . M r t ^ <> A. *• *. 

■ it " 


.* 637308*03 

.7778257-05 

.0000000 

-,1535372*00- 


■ 2107 107* 02 ■ 


••8038571*03 
-,25|7392-C 
.1777737-02 
-,7857088-05- 


-* I27 07 1 5-*C1- 


, 7357278*03 

,82512*0-08 

•13707|*-C8 

-« 000000 n 


^ g * M. £i ^ ^ ^ M 


- - *2373355*00- 
•1877773*0* 
— ,*217110-01 - 


• 7782700*00 

- .2913687*07 

•5567375*01 
•3101617-08- 
.DCCOCCU 
--•- 1 * 02279 * 03 — 
•7782718*00 . 
• CDCwCO(> 

*671 7797-01 
•3776383-07 
•OC93000 
-- -*H*a2278*£ 


,2 2 585 77 * 0 1- 


-r«6-2657*07 


• 757 o 785 *o 3 

,8870377.05- 

•OOOOOOO 
- - •1738219*00 


• 938 t 37 o*oO 
—,7719563-02- 
,1117827-06 
- ,3372353,00 


*7036778-03 

- • 7 e 3 o 78 ** 07 - 
*0000000 

- *1362702*00 


■• 7517287*03 

-• 0009000 - 


.1778717*02 
» 107*027-07- 


*73572*B*s 3 
- *0880000 
•OOOCOOO 
-fCOOCOCO 


.2220707*90- 

*7052882*08 

•721S180-01 


177*3*00- 


*7275533*02 
-*1033837*05 • 
•0008000 
*1736187,00- 


" H >1 7 53*07- 


*772Se78*{)0 

--•7725557-02 

.1280783-07 

—,3507217*00 


■ a > 7 1502* 0 1 


.3773837-03 
*0000000 - 
•0000000 
—.1278077*8 


►2»03334-*03- 


’*8070325*03 

- *0000000 

•1773173*02 
rl27fOI8-07- 


■4«3o57 1*1 
*7359278*03 
—*0003000 - 

•0000000 

— ,0000000 — 


•2I080B7*00 

*2587587-05 

•7215155*01- 


* 77 * 7837,00 
- *000000(1 
•8878755-01 
•0000000 
.0000000 
102278*03 
•7*80638*00 
,0000000 
• 170*727*00 
•OOOUOOO 
•0000000 


•3623273-03 
-- •5585872-07 
•0000000 
.1734187*00 


•7559787*00 
— ,772*877-02- 
.0000000 
. 37 oG 3 t 5 .Qo 


W V ^ W ^ V M 


*35(}7*17-o3 

-*0800000 

.0000080 


» 2 l 0 7 7 o 5 8 oa- 


• 1357988*00 


•8778751*03 

*0000000 

•1751507*02 

•1772310*07 


>4«6oS.}a*Oi- 


•7357279*03 
— •0000800 - 
,0000000 
--•0000009 - 


,3 8 * 2 *3 7 701 - 


♦1913018*00 

•1372218-07 

•92|5o72-ai 


i.29.f8790) 

•3027857-03 

.0000000 

.7587053-0* 

. 1738817*00 


-*Xl-15*76*{ia- 


> 7 * > 2590 *06- 


•7957813*00 
. 7730871-02 
•OOOOOCO 
- • 72776 So*c«J 


•3068231*03 
- .OOOOOw. 1 - 
•OCoOOQO 

*5t20l27-oj 


*•1007*73*07 

,0000000 - 

.*780552-03 
.5128752*07 


•7357278*03 
*0000000 -- 
•0000008 
•OOOCOOO 


•1370387*00 

.7155835-03 

-. 9217721*01 
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BesuLtaat Output 


27,7 

<0 

•© 

al 

ALH 

alcl 

ALOH 

ALOi- 

6U02 

C2H^ 

CL 

cuo 


-.-»2fct2.17*83 •,12AX732«03— 

• 3I«3«IC1*00 •93oS03A>83 

. I ft oTOT - C * 

.'i03»''75-03 .3tl22C0-0*i 

»*C3>,?CC rl3*»2«'»0**0» 

.‘*!56603-a** .|fc*73H3»0*l 

• ^C3 — ■ — ' “ ■ ^230^ 70^OS- 

.?35»I2H»32 *172078o>03 

;2*»7*03 

.32&f43i*C0 «i807lHS“03 

»^»^C303 7*3<* «79| - 

. 367268 1-03 •I7»»3*«3»0‘t 

• oa£i -.;000 .9*H38*7-02- 

• 2>-7:,?e7-Q<t «l90272a-3<< 

■ S637N12-02 .’976613-fl‘t 

-*H 35729 7*03 •^37*9732*01 

•92|639c*00 •72393S7-q3 

.33«767»-05 i9l700’3-0*- 

•18*3053-03 •873S825-0* 

— -•eooooe'7 - ' — - » t 5039 o* »o 2 - 

• 1 138999-05 ■ .3873278-05 

- •163089S.90 •1588111-07- 

•9215782-03 .99H8231-08 

-•9359297*03 *125*577*01 

•5053198*00 •*2*2552-03 

• 979o7*7-09 •|9(j8c9S-07 

*0000000 .2 10595 1-03- 

• 25795«5-q7 «92i|72*T-0* 

• 1*0**99*00 >0000000 — 

•272C*10-09 .0000030 

-»-9359a*7 *03 *24>39it 83*00 — 

•5113287*00 *5*9o877-o3 

- *0000000 - .ODOOCCO — 

•130**32-09 .ooooaco 

- *0000000 •*9010*2-09 

•OOOCQOO .9083055-0* 


•3373*1’*39 

.95*o250*00 

•**72310-03 
.a3982**-05- 
•OOOOCCO 
- .1003592-09 

' • 3 1 9o^8-1-*09 *■— ' 
•89387*0*00 
• .9293953-02 

•6973550-03 

*3319*17-05 

.0000000 


>-239 1729*09 -- 
•5**9803*00 
- *3oi8*7l-02- 
.9092997-03 

— t332 8 9 7 »- o7 
•OCOOOCO 
—.3230539-0*- 

>3^59051*09 

.51771*0*00 

- * mi 1 B T *7 ^ ^ ^ 
*-* • 7 u vx 

•12507*7-03 

-.QCQOCGD 

.0000000 

—.31870*9-07 





.289.1597*01 

•2*l2ll5-o2 
— , l5g7 8 9 8- 02 ' 
.115***8-09 
•227*8*0-09- 
.3898058-01 
- ,8999*19-05 


•^020i25*0i 

•93**310*03 
— . U 3 3928 - 03 - 

.29*9219*00 

-^5295*37-03- 
•I93t325t00 
- .7181*95-03- 


lU.7993i*oi._ _ 
.9359298*03 
■■ . 11*7 6 01 - 0 3- 
•93*2996-05 
- *5377000-09- 
.19*0203-09 
~ .*7998*2-01- 


. 60000000 .. 


•179209C-0I 

-•775*351-03 

•27*7270*00 

•7**7290*03- 


.2279519-02 

*1*82681-02- 

.1035038-09 

.1381021-09- 

,2729957-0! 

•2891597*01 

.9727776-03 

267*593-02- 

,3>i5198o-Q5 

r392798^-aS- 

• **232139-02 
-- .2203550-05- 

-•2«9iS97*ct 

•*9i6297-o3 

^ 3^-2 

, 3015537-0* 

.1968360-0*- 

.58277*1-03 
.1991590-05 


•2558272*03 
— .1925552-fr3- 
.2505720900 
— .*»01!32*-03- 
. 1978758*00 


i-20**3y9*B2 

■.2065395*03 
— .123 1-02- 
.2512*22*00 

— >99t- t 9 77 -09- 
.1598307*00 
— . 1928507-09- 

^0*974**02 

••932*720*03 
■ . 5o 3 o t* 5 - 02 
*29732***00 
^2*2*279-05- 
.1999502*00 
- •99881*0-0*- 


•9359298*03 
— .*9**998-09- 
•9775170-05 
— •3900870-09 

.9815555-05 


-^122599**01 

•9359298*03 

.2793989-05' 

.39*7733-0* 

..I ^ 

.*7950*9-0* 
•9122957-01- 

-*1290937*01 

•9359298*03 

»S898«9.t-0T 

.3810239-07 

.3398859-08 

.*996308-07 
— .9182398-01- 


-*1780388-02- 

•187223C-C1 

-*9529999-03 

•28239«9*C0 


•2195373*01 

-"*I*00**0“C2 
•2373070-01 
— •1 9 0* *9 8 - 02 - 
•2987388*00 
— *9120985-05 

•27M<95*01 


.2995281-01 
..•I 9*9 1 26-02 
.3095920*0? 
•3*55035-07 


•557**37-03 
.1398595-1)2 
•261871 1-07 
•9i3*392-o7 
•1798937-03 


■•5225373*03 
- . 7 37900* -02- 
•2990227800 
- .98570*9-0* 
.1981190*00 


•9359298*03 
- .0000000 
•1058719-07 
.7079523-07- 
.2050271-07 


•3259889-03 

•3339839-01 

-.1975799-02 

,3;592*!*C0 
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Resultant Output for Case 4 (Cont'd) 


*1&7T2TS*00. 

•S43S7S2«0S 


«&oi>vtt«oo 
•oosoooo — 
••22IT2T-C* 

- «O00C09O 

•0000000 

it m » o »* o e- 


—•0000000 

•ooosoeo 

>a 7 t »T a a * fl o 


•ooooocc 


. 12*M21aOS— fcZ ;fi 3450'»CX-- ^ »20 i 8 1 9-0 1. 


.teocQoo 


, tfc a* 7 t ^ * cw 


• 3A5V<t*t7-0A 
»9afc»a‘»T*oA- 


•S2ai«2s-a3 

• *0000000 

•oooocao 

-.S86S7I5-09 

.l00*?lT-0* 
^ ^ ^ 
‘'^VVWUU u 


• «I*»»C‘|T5*00 

- •2S7«e70‘'0•^ 
.2832397-09 

- *0000000 - 
•25179AA-07 

— *«eooo6o 


8 ^ I ^ ^ U 1 


*^72S370-03 
-•3235&8^-a3 
•OOQCOOO 
-.OCOOOOO 










*«43q41334>03 

r»03‘t002-CZ-^ 

•Z37c034^go 

*22 74034-0 7 

• U^Q307f00 
>4>WO W O 


«43SV2He*o3 

•ooooooa 

*00Q0D0C 

-•Dooaooo — 
•0800000 


,37i3*54-c» 

.^071113-31 

-♦l*lT7^2f0f- 

.32nC02^*00 


**I»8C*«54*00 

«0000000 — 

•oooooog 


•0080000 

.^434444-01- 


rOOOOC O B 

•OCOC008 
. 4l2gl72H«00- 

*0008000 
■4359247403 - 
.4Vb7344^00 
rOCOCCOt 


• 4l30*l«5-03 

-^0000000 

•8OO8C00 


^44 1 34^04 
•^4S4896*flO 

--•OOOOOOQ 

•OOOODOO 

. rt ^ «*L I— 

• VUWUivQ 


•0000000 
^ *0000000 — 
.0000000 - 
.a7*9732-0r 


,84a77To-OA 
tCOOOOOO 


-*a*<i(S97*8^ 

*3«996U~0? 

•iWHtTat-OO- 

*0000000 

roo coo eo- 


-^»0T2«2«02- 


•••27»4H3*o3 
— .9829993-02- 

*2oS972a«Qo 

- 0k r\ m. ^ ^ 

u u w u 


i4aA8S2290(— 

.93592«|8*(}3 

—.0000000 

*0000000 
* 0 00 0 000 


» 8909798*01 


-.1 1 80099-07- 
. 7181018-01 
■ » 18 77 s 79 - o 8 - 


.8383118-07 

-,1883713-09- 


*1838197*00 

.0000000 


.0000000 

.9219991-01- 


•3993*87*00 

-.0000000 


•C0GC330 

oQuOuGOO 

•occocoo 

• 99S2H*i7^0f " 

• OGCl’CCO 

• *lB39732 + t»a 
tcrcaooo 
oQCDuCCO 
oGOQCOCO 

*&ococog 


•coaccGO 
• H3597*(7*o3 — 

.64S7034+Q0 
- •OOCOQGO -- 
•OOCGBQO 

*r43HBi 

•aOOGOOO 

S&S13I9I-92 

•CGQDOOO 
. 43Ei92^74.03 - 

.4204603+00 

aljQCCCOt? 

oCOOCGOO 


•372ioSo-o3 
50 DOOM— 
•OODQOOO 
*0000300' 
•CQQOOOO 
- «OOCOGOC~ 
eooaocoo 


• 4*f2&273 + 03 

♦ i«&98874*QG 
50 MOt5 


f2^^J&47+g| 

.3HSI?74-o3 

— •702071 4^0 7 - 


-rtiC73S0+02 

••a’^2023+03 


• 9^ 2 4439-^2^ 


rt2S794&*0i — 
— rOO OOO OO 


»4#77M7*0t 


• OOOQOCC 


•OCOCCQC 
tCQOOCCO - 
«24997oh-OS 
•COOOCOO 


•QOOOOOO 
•0000000 
•OOOGQOO 
•2303134-05' 


.18S42S24-0Q 
•OOOCOOD - 
• l«i36M9400 
♦0000000 -- 


•0000000 
•OOOOOC0 — 
•0000000 
♦ 92J5S99-01- 


•92t5B9|-0I 
•1573 133*02" 
• 3757154+^00 

-•ooooooo — 


• 295079*i**q3 
- •0000000 - 
•OOOOCOO 
-- *0000000 - 
•0000000 


•5’4 J491+0C 

,0000000 

•OOOQOQO 
,0000000 — 
,2905710*03 


•3025153-03 
•OOOODOO 
•OOOCOGO 
•0000000 
•OOOCQOO 




-• J014559+0H 

,9924790-02 
• t 308331400 
•00C00C9 
.t934997-*00 
-8^000003 


*935^298+o3 
,0000000 - “ 
•OOOOQOO 
,0000000 - 
•OOOOQOO 


-tOOOOOOO 
• l57OliS*fj0 
>•9977993-03- 
•5304370+00 


•OOOQ0OO 
•7539943-03-- 
■2203997-0^ 
-•0000000 
•OGOOQOO 


84701401*03"- 
•|6S9e53+ot 
-•QOOOOOO — 

•0000000 
. ^ #. ** ^*8 * * 

• W UVU 8| V 


,a*8i597 + (}i: 


-*^ 1891 12*02 


*0000090 

•9000000 


>0000000 
O»*f73a-02— 

•20**82t'02 

***■»* — — ■» 
""•UVQVUvU 


.78*8981.03 
-•QOOOOOO 


•5722589-03 -•1137390*08 

— •0000000 *96 1329 1 -02 

•COOOOOO .*768592-01 

— > 000000 9 iOO&oOOO 


,1128657*01 

.8359288+03 

-- ,0000000 

,0000000 
— .<<000000 


..8,22363*01 


-.0000000 

.2029889*00 
. |8 958 88 » Q8- 


•OOSCOOO 


. 1 868*09.00 


,«97o577-08-- 


.0000000 

■.OOOOCOO - *9395858-01- 


*8666960*00 

*0000000 


>49a77|i*0>- 


•t*93S*2*0l 
■ »» 0 9 00 00 


-*«09iM7*Oi- 


-*21*A*T**0t 


•SA86Sia-o2 
■ *0 000000 


11*6813*08 


•-1-1211*2*01 — 
*8359288*03 


.08|9S*a*0-l 


— « 1227722-01 
•OOOCOOO 
.888*502-02- 
.0000000 


>0000090 
. 0000000 - 
.0000090 
• 0000000 — 
*0000000 


•0000000 
-vOOOOOOfl 
•7*3*795-03 

>0000000 


•OOOOQOO 
BOOOOOC 
•OOOOQOO 


.8876*21-01 
I COOOOOO 


.0000000 

•COOOOOO 


• 1890210*00 


.5288972-08- 


-•0000000 


•0000000 
-. *55999 IHIl- 


•21S9|7**Q0 
-•4951192-OS^ 
•8*39*50«00 
-•0000000 


. OOOCOOO — 
•OOOOQOO 
.2376825-01- 
*0009000 


•i798073“0* 
•OOOOOCO -- 
*0000000 
•OOC0090 
*0000000 


>9 7 3 o a * «*0 2 - 


»2 t*|5*7 *oi- 


•620*12**00 

•OOOOQOO 

*0009000 

•OOOOOCO 

.7925300-03 


*2258Sa*-o3 
-*0000000 - - 
.OOOOQOO 
•0QC0390 - 
•OOOOCCC 


*o a S 9 5 o * *ga 


18 10* 57 * 0 1- 


> l . f ** 92* Qa . 


’•*1225553*09 

,1010718-01 

.8133830*02 


.7198*40-02. 

.00009*9 


•OOOOCOO 

*0000000 


*0000006 


,1539882*00 
.122**87-03 •090CL90 


•835*280*03 

- *0000000 

•0000000 

OOOOOOO *0000000 — 

•0000000 


-.0000000 
•28*1793*00 
— *3509000-04 - 
•85897t**90 


*9878951-01. 


•oeoccc? 
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Resultant Output for Case 4 (Cont’d) 


M HS 




— ♦© 






At 

-*LOH~ 


C 2 M^ 

" Fee— 


ALH 

-AL 02 

CL 

fC 02 


H 20 

a " 


ALCe 

ALO^ 

cto 


ALCt 

-^ 20 - 


~» 0 “ 


ALCL 
-ce — 


-» 0 “ 


CL2 
“H 


ft 

-* 4 Cb - 


AlO 

-eeet- 


ALOC 

-e^a ™ 


FtCL 
- 44 M — 


FCCL 


K 

OH 


NH 

^a- 


NK 2 


NK 2 


HO 


N2 


«0 


«C 


• 0 


»0 


«0 


• 0 


H2 


LH 


♦ 63 H 6 it 2 *Q 3 . _ 
t 30 H 68 ^ 5 *eO 
0 ^ 7*03 


• 13 l 0 T*f »“03 
•ooocooc - 

.437*191-01 

• | 4 i* 6 * 9 -. 00 - 
.19SC378-02 

i-* 3«4 


« 94 *l 741 -o 3 
■ »g 3 4 7 > l 0“01 


.S^oSTST'OA 

.195*877-01 

.f 1 tT 380-01 

-r 45 oT**» 4 « 01 - 


_.* 3 . 577515 TQ 1 

*11*1361*01 

, 9 m 969 «-oa 


.1S13S11-01 


UI 

O' 


•307SI 68*30 
.132&271-D3- 
,«ic 863 q 2-03 
'OOOaOOO 
.H63&3S2-01 

*1 •t 9276 fc*Ga- 

. 1029954-02 
♦6316112*03 - 
♦ 3581 (J 12 *oO 
. 1597068 - 01 - 
.2758803-03 
rOCOCOOC 


*9197011*03 
-~*I38Q1|1-C1 
.3588662-01 
—.15195*6-01 
.1299312-01 
— r *e?0 19.-05- 


*6611128-03 

.1833198-01 

*0000000 

.5275321-0*- 

.1Q83972-03 

^01 


*28 98596*0 » 

*36839Q3-02 
,4 1 18 701* 0 8 


• 133Q92’-01 
.3000517-01- 
* 5 B 8 o 8 o 7 - 0 ! 
*1293186-01- 


^U 98 i 9 i**fl 2 

*6350372*03 
,6 957 333 -0 1.. 


..1191983*03. ictuumoo 


*2152996*00 

-*7366891-03- 


*1359218*03 

* 3 4 60358 . 


,1352191*00 
— * 9713723 - 05 - 


>1166017-01 
.6207950-01-- 
*2556311*01 
* 1 29 oS« 7-02 


-*1 8 * 1 3 95-02 ■ 
•160S991-01 
--5H3088-03 
•2681632*00 
-*8601562-01 


* 1016781*0 t 
*1606130-02- 

*6772983-03 

*8677156-05 

.0000000 


, 2 8 9889 6 *01 


•3130653-02 

-*1252088-02- 
. 1225823-01 
-.,1997896-01 
*1513150-01 

'•— 05 “ 






.1011019-01 

*3769732*01 

*7731172-03 

-*1125760-05 

,1278858-05 


*2239626-03 
•*262ll98*o1 — 
.67 i79B5*oO 
3997212-02- 
*5562125-03 


• 111 1187+03 
-,9167631-01^- 
*2175255+00 
— ,*192242-03 - 
• t1QB622tQ0 


*1359218*03 
,1367536-03- 
.6392512-05 
.5111590-04- 
,1355*32-01 
—*774 




-•1709850-02 


*1737388-01 

-•6176667*03 


•2739100*00 


— . 2898596*01 — 
•|15*l9i-o2 

* 1917626-02 

*68(362 i8-05 


-r2fl7 1196*02 

7*6362667*02 
- -.38 36186-03- 
.2513011*00 


.1202397*01 

.1359218*03 

*1117742-01 

*6756059-06 


—.2117775*01 — 


-,20*59?2-o2 

.2175125-01 


•6810326-05. 
* 16178 o 9 *C 0 
*1029391-01 
,6316112*03 
*1521 1E7*00 

-*121 

.1109762-03 

.0000000 


>6223011-05 

,1318113-06 

,1533810-02 
-•2256577*01 • - 
*6756653-33 


*3713196-06 
• : 6 | 6281*00 
*9hV 7780-S6 
k-316H2** 
, 1962928*00 

*202l»2*-06 

,7l397o6-01 

•OOCUCCO 

,5876256-07 


*2990067-06 
-*8875517-03- 
.1' ■'8275-05 
*0000000 
. 1689161-03 


.0000000 
— ,5587857-07- 
.9219790-05 

►2l75088*01 

*5116831*00 
r 26 o 2 5 o 9 — 02 " 


,1172117-01 
*6112761-06- 


*1539968t00 

.-,1673633-05 


,1319798-05 

*6646872-01 


•2922019*00 

-,9065138-01 


,331 1282*03 

-, 0000000 - 


*289859 6*fri - 

*8110013-03 

— , 2 6 6 581 2 - 02 


•OCOOOOO 
.0000000 
,2169119-06 
14*01 


,2211116-05 

-*1379850-06- 

,2381555-02 

,8150266-07 


* 2 o 9 o 559 *o 2 - - 
••3119981*03 
rl 8 o 8 l B t -02 


,2l95366t00 

-**259013-01- 

*1515129*00 

-,9811773-06 


-*9282027*01 — 
•1359218*03 

, .*8 ? ^ — fiJ. 


* 27 - 30635*01 


.9511653-07 

-* 1 »OTIM- 05 - 

. 1810615-06 

-.1355066*05- 


r I 


,2603372-01 

♦11l97S6-or 

,3025738*00 

-**111991-01 


•63|8371-o3 

- .2311591-07 
,1721370-07 
- .3296726-03 
*9899114-86 




•5283112*00 

- .1552376-02 

. 19 | 619 s -03 

- *0000000 

•oooocco 


,6726386-03 

,2559092-02 

,7i6j9l9-06 

,1788665-06 

.8974531-03 


■ 2 0 9 6 7 6 5 * 02 


■*SlS7i22*03 

^,3723212-02 

,2471120+00 

.5613126-05 

.1515976400 




*1359218*q3 

*1119706*04 

,3191120-07 
- ,8320516-06- 
,60*8909-07 


,30881 70 * 01 


.1276696-02 

•2891670-01 

-.1163813-02 

,3079069*00 






It 




{ 
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Resultant Output for Case 4 {Cont*d) 


.96M775H-0T 


iSn668 24(30 

■OOOOQOO - 

• iS 2900 J- 0 '« 
«ooaoGOO 
•OQOCOOO 

•OOODOOO 
♦ *3‘*6m2403 

• **983357400 
^□OOuCOO - 
*0000000 

r^TOOOOOfr- 

•OOOCOQO 

• 13^^906400 
*0000000 

•63H6^I2^03 

•^ 9792 H 8 * 0 C 

rGQQOCOe 

♦QOOQOOD 
•QOQOOOO - 
•0000000 
- • I 1 779 o 5 * 00 - 
•OOQOOOC 

1240-3 

• 4 fl 8 (j 897400 
» 000 0 0 0 D 
•OOGOCQO 
♦CCOOCOO 
•ooccooo 

»6S339o7^04- 

•ooocooo 

-*63H6** I 2*03 - 

• 5530 *+ ^ 3^00 

•ooocccc 

•OOOC0OC 

•ocooooo 

•^ 165 QB |«02 

•COOCGOO 

t*3*»6‘U2^03 

•652&37940Q 

— — HJCOOOOO — 

*0000000 

«5d44«67*02- 

•0000000 

«^ 22 ISO ^*02 

•0000000 

•5455Q8740O 

•OOCOCOO 

.OCOCCOO 

• 1897670*0f 
•oocccoo 

-^*3731504*^02 

.0000000 


tOODOOCQ 
• *««U6QS9*0-t 
* 33 A 97324 go_ 


tODOOGCO 
*2i90S5I-C7 
-*l 735452 itaaL. 


«2749C4i«07 


_i«2i>^fl27^D4 


*g<t 60 * t 9 fl *04 * 9149325*01 


•38tH59^4Q| 


>J>0^77C^02- 


•S 273 S 294 Q 3 

-*71*10359-0^-^ 

«293a03|400 


• 5757205-0^ *97<i4593+oo t55333«i^03 

-*0000000 *36-*2927-o3 ^IBICS^I^M 

.OOOdOCC .9S38 o77-09 *37j214c-07 

- «467|2g 2«09 '*0000000 ♦3l8445l407 ^5419459-04 

*3331245-04 *0000000 *1443991-03 « 194^943400 

■mOOODOOO *000 0 000 *A44 o2 fl 9^ 4 

•5120585-GS 
♦ 7539**4H*oI 
**♦52 9 979*^03 

*0000000 — 

•CCC002C 






-•oaooaoo — - 
•0000000 

• * 6 SaSSf> 03 L- 

• iinV 92>07 


-»iiU2oa^o3 
•SR22Vt I'OI 
-•.1«7S009'*02 
•»|*t1Rl*00 
-••200010*01, 


•0000000 
• uJ’iaT^o** -- 
• 42Tl8S<t«>00 

•2SS7lfO«0^- 

.227323*1-0^ 


•OOC0300 
•0CCC03O - 
tOGCOCOQ ^ 

• 3749732-01 ’ 

•9O75029-o3 

r<H?CrOi>^0 

•OCCOOCG 
, l9lS898*07 
*0000000 
— oOooocoo — 
•OQOOCOO 


«^4}2fir09«o7 

—-*0000000 

•0000000 

rJ0*®^074(l9 

« 49494754 q 0 

• 6 0 0 0000 


► 2498594 + 0 j _ 
•37f0299*o2 
^*1949111-09- 
•0000000 
,0000000 


*4979228-04 
•OOOGDOQ 


-»ai 0 T 3|?*02 - 
•*rAlA922*Q3 

•T4QS*8A*0a- 

> 2202 t 08 t 00 

r*a 00fKW 


• I 
* 


*1934339*00 

.*7339471-04.- 


273599+01 - 
9359294403 
*0000000 

•0000000 

_ 29 0 / 9 PI 

U V V 


•R322a2*l*0« 


-•*7?«8«3-(}& 

•STi»"ao-oi 

, |H 7H7 t -C2 


•0000000 

•0000000- 


-•20*85»A*0 J 

•3*SC2«2~03 
. U 6 0 1 T8 - 6 5 - 


•-•^1C73**0*02 .— 
«03 

■ r » » 2 5 0 * 7 « *2 - 


.<1 


• 32 J 37*B“02 
.0000000 — 
.CQC0900 
-.ocsooao -- 
.0000000 
rooooooa- 


•0000000 

— •0000300 - - 

.31S3B77-0* 

— *0000000 — 
•0000000 

> 77H frB»* 03 


.0000000 

•0000000 

•3905330*07 
-•DOOGOOO 


.2g3B91o«00 

•0000000 

.t*t361BS.OO 

•T22I32B-0*- 


r* 73 « 9 *Ot — 
B35T2M903 

• U OO W U w V 


•»91O337*C0 
.B2IS527-0J 

•^7f»T35*0l 


.0000000 

,0000000 

•0000000 

-•0000000 


■■• l■ 2 BB» B 7 - 07 ■- 
•7Bl718i-0l 
•1977*1^-02 
•3S77**2*00 
-•«21S*2t-OI 


.OOG0300 

.7s3*963*02- 

•22*2583-0® 

•OODOCOO — 
. OCOOCQO 
— -. 0000006 —" 


• 9B*ISB7 l*Q0 

•ooooooo 

•ooooooo 

-•OOOOCOO- - 
• 29tl0^2-0<l 
■OOOOOOO 


• W M f W • 


•OOOOOOO 

~*4*2*ia8*m3 

•7153*79*00 
-—•OOOOOOO - - 
•OQOQOOQ 

•ooooooo- 


•31*0705-03 
-•OOOOOOO — 
•OOOOOOO 
•0000006 — 
•OflOOQOO 

- ri99 #1 n 4999 
WWMr BrvB VV 


■» 2 l 8 7 * o 7 * o a- 


••?750S7B.o3 

•»*24250-02- 

.1513*21*00 

•OOOOOOO 

• H36t88*00 

- . ■•^it 3a* BB*B g 


r H B t B* 0 * 0t - 


■835*2*8*03 

-•OOOOOOO 

•OOOOOOO 

•OOOOOOO 

•OOOOOOO 

•OOCOO Ofl 


,54 7 04 72 + CH ~ 


-*0000000 

♦126999S4Q0 

^1911790-02 

*MOOl92*CO 

* 92 1443 *^01 


•OOOOOOO 
— iOQCOOOO “ 
* 0 CGOCO0 
♦ 3749732-03- 
*•2 I44j705-03 


“*0000006- 
•OOOOOOO 
•OOCOCOO 

•oocoaoo 
•OOOOOOO 
*0000090 

» t^325-'03 
•OOOOOOO — 
•OOOOOOO 

•oooaooc 

•ooooooo 

.0000090 -- 
•OOOOCOO 


• 7 a*t* 3 *-ol 

- •OOOOOOO - 

.0000000 

Mrt8802?*03 

•l7]385|*B> 

— .- 0000060 

•OOOOCOO 

— .OOOOOOO 

•7863*16-03 

— •OOOOOOO 

•OOOOOOO 


.1188587*01 

*0000000 

•OOOOOOO 

*0000600 

.78116*5-03 

— *ooomoo- 

.ooooooo 


-•28*85*6*01 — 
•2*65378-03 
• OOOOOOO — 

•ooooooo 
— .w eoooo — 
•ooooooo 
,6000000 — 

-,*8*85*6*01 
•S678*5*-o3 
►OO O O O W 

•ooooooo 

.0000006 

•OOOOOOG 
— *0006000 — 

•28*85*6*01 


-*4ii j8o7*oa — 
*•1110051*08 

r*853577-02- 

,8*37785«0l 

^ VII VVM W 


• 1880277*60 
-,2802303-08- 


■^11*5000*01— 
•835*288*03 
— •OOOOOOO 

•ooooooo 
— « o oooooo 


h74«t-338*0l 


-•OOOOOOO 

.1877870*00 
■ .3»5 71 * a o 0 8 


•OOOOOOO 
- ,0000000- 


.86*2885*00 

-,•2807*8-01 


** 86 o 6 |*OI - 

••1180703*08 
, * 5 **661-02 


•3*85VS*-o3 
•OOOOOOO — 
.OOOOOOO 
•OOOOOOO - 
•OOOOOOO 
-•OOCOOOO 


,6813*72-01 

^OOOOOOO 

.1862531*00 
— ,3888310-08 

^ 32 79 0 ^ 1 * 07 


122873*01 — 
835*288*03 
■•OOOO O OO 


-»0*3t788*0l 
■OOOOOO O 


•OOOOOOO 
•OOOOOOO - 
•OOOOOOO 
•OOOOOOO- 


•2030182*00 

-•1302878*08 

•8682766*00 

-;*383268-0I 


.I43 * 860*m^ 


*• 1203h68*08 

-,**70897-02- 

•1858052-01 

.OOOOOOO - 

. 151*087*00 
.88*^08-08- 


.835*288*03 
—•OOOOOOO— 
•OOOOOOO 
- *0000000 — 
•OOOOOOO 
--•OOOOOOO 


» *5 l *ta86ql 


-.OOOOOOO -- 
•2372*27-00 
-•1700275-05 
.8612588*00 
•»785668-01 


'■%a tun *;wD ek*.- ENO 
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Section 3 

REACTING AND MULTIPHASE (RAMP) COMPUTER PROGRAM 

A precise knowledge of local flow properties in nozzles and exhaust 
plumes is necessary for performance, radiation, attenuation, heat transfer 
and impingement analyses. The reacting and multiphase (RAMPl computer 
program is designed to give detailed flowfield information in the supersonic 
region of a reacting multiphase cwo-dimens ional or axisymmetric flow field. 

The boundaries of the flow field may be solid such as in a nozzle or "free" 
such as in a plume. The analysis may be utilized therefore to predict per- 
formances as well as plume characteristics of a given engine system. A 
printed record of the program results is given for user inspection while a 
binary tape is provided for subsequent manipulation by other analyses. A 
transonic solution taken from Ref. 7 is also provided internal to the program. 

The flow of a gas-particle mixture is described by the equations for 
conservation of mass, conservat on of momentum and conservation of energy. 

In the gaseous phase the state va.-iables P, p, R and T are related by the equation 
(.)£ state while for the particulate phase the equations are for the particle drag, 
particle heat balance and the particle equation of state. Development of these 
equations is based on the following assumptions: 

1. The particles are spherical in shape. 

2. The particle internal temperature is uniform. 

3. The gas and particles exchange thermal energy by convection 
and radiation (optional). 

4. The gas o'. _ys the perfect gas law and is either frozen and/or 
in chemical equilibrium, or is in chemical non-equilibrium. 

5. The pressure of the gas and the drag of the particles contribute 
to the force acting on the control volume. 
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6. The gas is inviscid except for the drag it exerts on the particles. I 

7. There are no particle interactions. | 

I 

8. The volume occupied by the particles is negligible. 

9. There is no mass exchange between the phases. j 

10. A discrete number of particles, each of different size or chemical 

species, is chosen to represent the actual continuous particle I 

distribution. - 

11. The particles are inert. 

The supersonic two-phase solution accepts the starting line provided by 
the internally calculated transonic solution as well as other pertinent data 
supplied through the read function. The equations of motion under the assump- 
tions just listed are hyperbolic and permit the use of a forward marching 
scheme; a streamline/normal grid structure is employed where the step 
lengths in the axial and radial directions are under program control. Both 
BCD (printer) and unformatted binary output tapes are produced. A Prandtl- 
Meyer expansion of the gas phase and a free boundary calculation are employed 
to treat the plume flow solution. The run is terminated when prespecified 
problem limits are reached. 

The two- phase flow analysis will treat an extrei..ely wide range of 
operating conditions. With few exceptions the limitations are imposed by the 
theory rather than numericcd considerations. In this discussion dimension 
statement sizes which are arbitrarily set are not considered a limitation. 

The true limitations are: 

• Supersonic regions influenced by embedded subsonic 
regions. 

• Vacuum or limiting expansion limitation — a small 

region of the expansion fan for a vacuum expansion 
cannot be treated where the Mach number is so large 
that treatment by continuous flow assumptions becomes j| 

meaningless (this limitation is both numerical and iX 

theoretical). 
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0 For two -phase flow the lower boundary can only be 
horizontal (i.e., nozzle centerline). 

A complete derivation of the governing equations are available in 
Volume I of this report. The characteristic equations employed in this 
analysis are given in Table 3- la and 3-lb, and a list of symbols is provided 
in Table 3-2, 

A free molecular flow calculation has been provided as an option which 
permits treatment of the rarefied regions of the plume. As the gas expands 
it first freezes out the vibrational and rotational modes. During this transi- 
tion the characteristic equations continue to be employed but the equation of 
state is modified. At translational freezing, however, the solution switches 
to an effective source solution. The stream lines are considered straight 
and the velocity constant. Conservation of mass then determines the density 
while other properties are found from the equation of state. 

Each of the subroutines comprising the RAMP program is listed in 
Table 3-3, The subroutines which call and are called by the particular 
routine as well as a brief statement regarding the function of the routine are 
also included in the table. Routines which have an asterisk in the description 
column are taken from the Ref . 7 analysis. 

Tables 3 -4a and 3-4b present a flow chart of the main routines in func- 
tional groupings for the equilibrium and finite rate versions. To attempt to 
completely flow chart the entire program would probably transmit less infor- 
mation than that given in Table 3-4 since it would be extremely complex and 
bulky. The functional flow chart in conjunction with Table 3-3 and the pro- 
gram listing is felt to be the most appropriate method for presenting the 
information. 
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T«bU )-U 

XNTHALPy -ENTROPY 'VCLOCtTY FORM OF THE CCM4PATIBILITY EQUATIONS FOR GAS-PARTICLE 
rtxm (FOR CMEMtCAL SQUILlSRtUM AND/OR FROZEN FLOW APPLICATIONS) 

# Th» vftrUbU* q.A* H«S,p^ u^. v^, compt«tcily gftt>^pArticU Qq* «t k glv<n locAtion 

ia tb« (low Ct«ld« 

0 Tb« slop* of tli« gat ttream11ii«« •. it glvtn by 



and tbo compatibility tquationt which apply along gat atraamllnaa art! 

dH - T dS + A ^ [(a + tang (v - v^ij dx » 0 


(1.1) 


<3.21 


whey* 


(C» . R) ^ 

{E< 

M 




‘1 ‘ ^ ^ (tJ . T> [g^ 


(3*3) 


{3.4t 


1 i 


and 


£ 

n.hJ-; 

cl . iLSi 


(3.5) 


(3.6) 


• The tlopt of the Mach llnei it given by 


^ » tao(«Ta( 

and the compatibility eqoattone which apply along each Mach line are: 


(3.7) 


f 4 Q + cpto . tine cotq dS v cotct dH -r & tlnfl tino dx 
^ y cot ( 0 + 0 ) 


dx 


““2 — 
pq cot < 0+1 


Np r 1 

— A^ 1+ (v - v^) cot (0 +o) + (u - u^> eiA<0 + o) + q“j^ | ~ ^ 


• The particle atreaiuUne direction, 0 ^. it given by 


« t«n0l j = I.NP 


and the compatibility equation a which apply along particle ttreamlinet are; 

du^ 5 j A^(u>u^)dx j ^ l.NP 


Jdv^ = <v-vJ) dx i = l.NP 


dh^ = A^ (T^ ‘ T) + (T^)^ - T^^jj dx 


J ^ l.NP 


(3.81 

(3.9) 

(3.10) 
(3. ID 

(3.12) 


■ ) 

■ i 

: ! 


One Additional equation for particle dentity le derived uting the Integral equation for parDcte 
maee coneervation 


dm^ V (2tf)*pA (yij ^Jyj , yj (yi) 


and 6 taker on the values 


6*0 for Z dlmentlonel flow 
1 for axitymm;;trlc flow 


(3.n. 


■; I 
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PRESSURE-DENSITY- VELOCITY FORM OF THE COMPATIBILITY EQUATIONS FOR GAS-PARTiCLE 
FLOW (FOR CHEMICAL NON- EQUILIBRIUM AND TRANSITION FLOW APPLICATIONS^ 

• The variables q» 0, P, p, u^. completely define the gas -particle flow at a given location in the 

flow field 


The slope of the gas streamline, 0, Is given by 

^ . tanO 

and the compatibUlty equations which apply along gas streamlines are* 

NP 

q dq + ^ + j(u - u^) + ^ (v - dx = 0 . 

j-l ^ ^ 

^ NP 

dP-a^dp +^dx-A^^pi A^ a| dx ^ q 

J-l 

and 

pu dX^ - Wj dx = 0 I = l,NG 


(3,n 


(3,14) 


(3.15) 


• The slope of the Mach lines (left running characteristics and right running characteristics) 
is given by 

^ a tan(0+a) 

and the compatibility equations which apply along each Mach line arei 

NP 


d0 + cota + 

pq 


dP -r ^sinS slnu dx 


•a +. 


_dx 


_ 2 
Y cosffl +0) pq** cos(0 


+ {u - u-*} sin(0 +a) + 


_!Li 

q sina I 


dx 


^ p i=i 

4-3 


— ^ p^ A*^ [+ {v - v^) coe(0 +a) 

+«» ^ I 

N2 

lE^^i 


q sina cos{0 +a) 


(3*7) 


• The particle streamline direction* 0^, is given by 

^ = tane^ j ^ 1,NP 

and the compatibility equations which apply along particle streamlines are; 


(349) 


u^ du^ = 

aJ (u - J) dx 

j ^ LNP 

(3*10) 

dV^ a 

(v - v^J dx 

j = 1*NP 

(3*11) 

A-* C-* (T^ 

-T,4^ ( 
m“' r-' 1 

gi (T^i^ - T^lj dx j = l.NP 

(3.1Z) 


• One additional equation for particle density Is derived using the Integra equation for particle 
mass conservation 


and 6 takes on the values 


dm^ s (2;r)^ p^ (y^> dy^ - v^ (y^) dx^ 


6 = 0 for 2 dimensional iiaw 

1 for axisymmetric *low 


(3,13) 
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c 




H 


m’' 

NP.NG 


Pr 

q 

R 




r“ 

S 

T 

rpj 

U 

V 




ri 


V" 

y. X 


1/ 


sec 


f.2 y 2 

it /sec 


f.2, / 2 /o„ 

ft /sec / R 


None 

None 


None 


y 2 

ft /sec 

^4.2 / Z 

ft /sec 
slug/ft^ 


None 


None 
ft/ sec 


- 2 y 2 ,o„ 

ft /sec / R 


ft 

ft^/ sec^/*^R 
°R 


°R 

ft/sec 
ft/ sec 
ft/ sec 
ft/ sec 
ft 


1 / 


sec 


y 2 

m /sec 


ft'^/sec‘^/°R m^/sec^/°K 


2 / 2 /<} 
m /sec / K 


None 

None 


None 
2 


in '/ sec 
2 / 2 


m /sec 

kg/m^ 


None 


None 


m/ 


sec 


2 / 2 yO„ 

m /sec / K 


m 


2 / 2 
m /sec / K 




m/ sec 


m/ sec 
m/ sec 
m/ sec 
m 
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Defined in Table 3-1 
Defined in Table 3-1 

Defined in Table 3-1 

Gas specific heat at constant 
pressure 

Emissivity 

Drag coefficient parameter 

> 

Stokes 

Nusselt num>er parameter 

(Nu/NU g|. qI^. g g) 

Total Enthalpy 
Particle enthalpy 

,th 


Mass density of a j"* particle 

Number of particle sizes, number 
of gaseous species 

Prandtl number 

Velocity 


Gas "constant" (universal gas 
constant/molecular weight) 


•th 


Radius of a j particle 
Entropy 

Static temperature 
Particle temperature 
Gas axial velocity component 
Gas radial velocity component 
Particle axial velocity 
Particle radial velocity 
Radial, axial coordinates 
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UST OF SYMBOLS (Continued) 


Symbol 

English 

Metric 

Description 

To 


°K 

Local total temperature 

To 

°R 

°K 

Reference total temperature 

a 

rad 

rad 

Mach angle 

a** 

None 

None 

Accommodation coefficient 

y 

None 

None 

Isentropic exponent 

Aqj 

ft/sec 

m/sec 

q- qj 

6 

None 

None 

0 — two-dimensional, 

1 — axi symmetric 

e 

rad 

rad 

Flow Angle 

y 

Ibf-sec/ft^ 

kg/m sec 

Gas viscosity 

P 

slug/ft^ 

kg/m^ 

Density 

pj 

slug/ft^ 

kg/m^ 

Particle density (j^ particle 
size) 

a 

^4.2/ 3 

ft /sec 

2/ 3 

m /sec 

Stefan- Boltzmann constant 


Not used 

cal/gm 

Chemical potential of specie 


Not used 

gm/gm 

Mass fraction of specie i 
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Table 3-3 

RAMP PRCXjRAM subroutine LIST 


Subroutines 
No» Name 

Calls Fallowing 
Routine (s) 

Called by Following 
Routine (s) 

Description 

J 

ABCALC 


27 

♦ 

2 

ALGINT 

- 

18,31 

log "log interpolation routine 

3 

AOASTR 

82, 9B, 116, 44,22 

74 

iterative solution of area ratio as a function 
of Mach number 

4 

AVER AG 

98,21. 106, 83, 94 

95 

determines flow regime from Knudsen 
number 

5 

BLKDAT 

- 

- 

block data routine 

6 

BOUND 

47 

7, 30,49, 55, 70,71,74,95 

provides radial dimension and angle of 
bounding wall at given axial station 

7 

BOUNDA 

41,6,23,46 

70, 72, 92 

locates wall point when a shock wave is 
near a wall 

d 

CARCTR 

77,98. 12,84, HI 

72. 89.91.92 

solves an Interior point compatibility equa- 
tion for a downstream shock wave point 

9 

CCALC 

- 

27 

* 

10 

CHECK 

93,69,35,31 

70, 95 

adds points to or deletes points from the 
solution as necessary 

11 

CHEM 

102,85, 88 

56 

computes the species net rates of pro- 
duction as functions of temperature, 
density and gas composition 

12 

COEFEQ 


8. 55,95 

computes coefficients used in solution of 
the two -phase compatibility equations 

13 

COEFFS 

35,69.41,77,31 

55. 95 

computes the particle flow properties 

14 

DELTAF 


24, 115 

computes the turning angle through an 
oblique shock wave 

IB 

DMDXSl 

- 


dummy routine not presently used 

16 

DOTPRD 

- 

112 

computes the dot product of two vectors 

17 

DRAGCP 


31, 77 

computes the drag coefficient for the solid 
particle using KUegel 

18 

DRAGMR 

2 

31,60.65,77, 107 

computes the drag coefficient for the solid 
particle using Crowe 

19 

driver 

40,74. 108,70 

51 

driving routine for main program flow 

20 

EMOFP 

t 

— 

61 

calculates Mach number from pressure 
and entropy 

21 

EMOFV 

106 

4,24,26,31, 34, 52,63, 
65, 70. 73. 77. 78, 81. 82. 
87. 89. 91, 109, III. 115 

computes Mach number from velocity 

22 

ENTROP 

~ 

3.34. 115 

computes entropy rise across gas shock 
wave 

23 

ERRORS 


7,33, 34,41, 52. 55, 70. 
72,81.82. 89, 90.91.92, 
100, 106, 109, MO 

. jutine prints various error messages as 
for the appropriate flag from the calling 
routine 

24 

ESHOCK 

98,21, 75, 83,22, 14, 
U5 

61. 63, 90. 91, 92, 109 

computes properties downstream of shock 
wave 

25 

EX PC OR 

55.41. 93. 77,61 

70 

computes the flowfield points near an 
expansion corner 

26 

FABLE 

96, 118, 106.75.21 

98 

routine used In determination of local 
dependent state properties 

27 

FCALC 

1.9,68 

45 

A 

28 

FINDU 

- 

60,65, 107 

+ 

29 

FNEWTN 

— 

34,55,95 

determines the Newtonian impact pressure 
on pUtme free boundary 

30 

FREEMC 

6,43,41. 117.35. 
69,61,62 

70 

computes flowfield properties in the free 
molecular flow regime 

31 

GAPPBL 

2,69,98. m. 106. 
21,75, 97, 18. 17 

10. 13, 71. 95 

interpolates for flow properties between 
two data points 

32 

GASRD 

33,37.38,36.96, 

118 

74 

subroutine which reads gas properties 
from cards 
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Tablo 3-3 {Continued) 




II 


II 


II 


.? , 

^ai 


Subroutlnea 
No» Name 

Calls Following 
Routine (s) 

Called by Following 
Routine {b) 

Description 

33 

34 

GASTAP 

HYPER 

36,23.39 

98. 75.21.29,63.44, 
100.105.23 

32 

70 

subroutine which reads gas properties from 
tape and outputs on tape 

determines hypersonic back pressure at 
corner 

35 

IDMPFP 

85 

10,13, 30,55.66,70.78, 
79,95 

function to compute the particle storage 
location within the PFPARY array 

36 

IDMTAB 

— 

32,33,73 

function tc compute gas property storage 
locailons within the TABB array 

37 

IDMXSI 

— 

32 

function to compute gas Interpolation param- 
eter storage locations within XSlDlM array 

38 

IDTAPE 

96 

32 

writes Ideal gas properties on data tape 

39 

IMPUT 

93 

33 

reads chemistry Input data for finite rate 
case 

40 

INI TP 


40 

initializes data arrays and control variables, 
sets convergent criterion 

41 

INRSCT 

23 

7, 13,25,30, 55, 70, 71, 72, 
79,89. 91, 92,95 

solves far the intersection of two straight 
lines 

42 

INTEGR 

69. 112 

S3 

integrates conservation equations along 
normal 

43 

ITERM 

— 

30, 70 

decides whether line should be terminated 
due to problem limits being exceeded 

44 

ITSUB 


3,34,52,58,63,71,76. 
81,82,87, 89. 90. 91,92, 
100. 104, 105. 109 

general purpose iteration control routine 
solves function of one variable 

45 

JAMES 

27.57 

65 

♦ 

46 

KIKOFF 

— 

7. 106, no 

provides proper termination ^card reads, 
tape writes for Internally detected errors 

47 

LAGHNG 


6 

interpolates for r. 8 as a function of x 
when wall paints are Input 

48 

LEGS 

- 

57 

iS 

49 

LIMITS 

6 

70 

determines whether current boundary equa- 
tion still applicable 

50 

LIPIN 

82, 111.98 

74 

prepares Initial data surface for simple 
options 

51 

MAIN 

19 

- 

driver program 

52 

MASCON 

82,21, 83.44, 23 

74 

determines startUne data from mass 
conservation, linear Mach number 
variation 

53 

MASSCK 

42,69 

70 

integrates mass ftaw, determi 'ies cumu- 
lative error in mass flow 

54 

MAXTIM 


62, 70 

Unlvac 1108 system routine for checking run 
time against input variable for cutting off 
run before maxtime is reached 

55 

MOCSOL 

77,69, 35, 105, 7$, 
41,6,84, 13,56,29. 
81, 113, 12, in, 23, 
93 

25 

solves the characteristic equations in con- 
tinuous regions, calling arguments control 
type of solution i.e,, upper boundary, lower 
boundary, Interior, single phase only 

56 

NEWENT 

11 

55. 95 

computes entropy and enthalpy/OF change 
along a streamline 

57 

NEWT 

48 

45 

4 

56 

NOR SC K 

104,44 

61 

calculates pitot total pressure for finite rate 
case 

59 

NUSNUP 

- 


dummy routine presently not used 

60 

ON ED 

28, 16 

65 

♦ 

61 

OUT 

64, 58, 24,98, 75,77. 
112,69, 93 

25. 30, 70, 91 

performs bulk of printed output function; 
outputs are flowfield data points 

62 

OUTBIN 

54,69. 97 

30, 70 

performs unformatted binary output of flow- 
field data on a magnetic tape 
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Table 3-3 (Continued) 


Subroutines 
No« Name 

Calls Following 
RoutLne(a) 

Called by Following 
Rowtlne{sJ 

Deacrlptlon 

63 

OVER EX 

98,21,24, 75,44, 
in, 69. 35 

34 

Computes corner condUion for over- expanded 
flow situation 

64 

PAGE 


61.65,67, 73 

writes page headings 

65 

PARTI L 

60.45, 80,28, 18, 
114, 107, 64, 93. 98, 
21, 106 

108 

♦ 

66 

PARTIN 

82, no, 103. 75, 93, 
98. 35,69 

74 

reads gas and particle flow properties from 
tape or cards 

67 

PARTPH 

64 

74 

reads input and sets up data table of particle 
T versus h 

68 

PCALC 

- 

27 

« 

69 

PFP 

B5 

iO, 13, 3C, 31. 42, 53,55, 
61,62,63,66.70,71,73, 
77, 78. 79. 95. lOI 

computes the particle property data storage 
location and retrieves data from the PFPARY 
array 

70 

PHASE 1 

93. 77, 6:. 53, 101, 19 

62,6, 109, 21, 103, 

75, 92, 95, 54,49, 7, 

69, 35.41, 91, 10, 30, 

98, 111,43,79.78,25, 
34,81, 113, 100,23 

this subroutine performs the overall control 
for the entire flowfleld solution, selectively 
calling tho{,e calculations which are perti- 
nent to the particular mesh construction as 
well as the highest level logic routine com- 
bining point or limited region solutions into 
an entire field solution 

71 

PHY50L 

69,46.96,44,31. 77, 
6, 111 

89.91, 92,95 

computes Intersection of physical character- 
istics with a ''normal ' data line 

72 

PHYZOL 

7,41,23.96, 111,8 

92 

computes intersection of characteristics 
witii "normal" at a downstream shock point 

73 

PLMOUT 

64,96.36,98,21.69 

74 

this rout^^e outputs the input data 

74 

PLUMIN 

73, 32, 86, 6, 3, 52, 
50,66,67 

19 

this routine provides the control for all input 
functions by selectively calling pertinent in- 
put routines and/or calls transonic solution 

75 

POFEM 


24.26,31.34,55,61,63. 
66. 70. 77, 78. 81, 83. 67. 
89, 91. US 

comnutoa pressure as a function of Mach 
number and entropy 

76 

POFH 

44 

105 

computes pressure as a function of velocity 
and enthalpy 

77 

PPATPT 

98, 106.21,75.69. 
97, 17, 18 

8, 13,25,55,61.70.71, 
79, 92. 95 

calculates and stores gas and particl' de- 
pendent variables as a function of the h?de- 
pendent flow variables 

78 

prandt 

96, 100, 111, 21, 106, 
75, 105. 93, 69. 35 

70 

provides overall control of Prandtl-Mcyer 
corner calculation 

79 

PRFRBD 

69,41, 35, 77 

70 

computes flow properties at a particle limit- 
ing iritersoctlon with a plume boundary 

60 

PROP 

- 

65, 107, 114 

* 

81 

RCMOFP 

98, 96, 1 13,20, 75, 
21,44,23 

55, 70. 95 

iterative solutLon for Mach number as a 
function of pressure 

82 

RGVOFM 

98, 96. 113,21.44. 
23 

3, 50.52, 66 

Iterative solution velocity as a function of 
Mach number 

83 

RHOFEM 

75 

4,24,52. 115 

density as a function of Mach number 

84 

roterm 


8, 55, 95 

rotational term in method of characteristics 
equation 

85 

RWU 

— 

11, 35. 69. 93 

IJnlvac 1108 machine language routine to 
access temporary storage 

86 

SETHTG 

102,98 

74 

computes 1 -dimensional siariline properties 
for a Constant startline property finite rate 
case 

67 

SI TER 

98, 21. 73,44 

65 

computes entropy as a function of pressure, 
total enthalpy and velocity 

88 

SLDP 


11 

solves a set of N simultaneous linear equa- 
tions using the Gauss -Gordan reduction algo- 
rithm with ihq diagonal pivot strategy 

69 

SLPLIN 

n, 71. 8, 75.21,44, 

91,95 

performs the slip line calculations 


23 
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Table 3^3 (Continued) 


Subroutines 

Callt Following 

Called by Following 


No. 

Name 

Boutlne^a) 

Routlneta) 

Description 

90 

SOKFLX 

24,44, 23, 98. Ill 

- 

computes the flow properties downstream of 
a reflected shock 

91 

SOKINT 

21,41,95,83,61,24, 
111,109, 76,44.71. 
8. 89, 98 

70 

computae the flow properties at the inter- 
section of shock waves of the opposite family 

92 

SOKSOL 

41,95,111,24, 98, 
72.71,8,44,7,23, 
77 

70 

provides control for a shock point solution 

93 

SPCTX 

85 

10,25,39, 55*61.65, 66, 
70,78, 95 

reads from or writes on data files the 
species mole fraction for each point (finite 
rate version only) 

94 

STGMOD 

— 

4 

computes gas thermodynamic properties In 
the transition flow regime 

95 

STRNOR 

93,69, 35. 77, 111, 
41,89,71,31,13. 
84,56,12, 29,4,81, 
113, 10,6 

70, 91. 92 

this subroutine provides the regional control 
for the atreamline/normal solutlonr It has 
a lower level of logical control than PHASEl 
(70) being interested only In determining the 
location Euid flow properties of a single new 
mesh point 

96 

TAB 


26, 32,38, 73,81,82. 98, 
108 

Computes the thermodynamic data storage 
location and retrieves data from the TABB 
array 

97 

TEMTAB 

— 

31,62, 77 

performs table lookup for particle T = f(h) 
or h = £(T) 

98 

THERMO 

96, 26, 99 

3,4, 8, 24. 31, 34, 50. 61, 
63,65,66,70.71.72, 73, 
77,78,81,82, 86,87. 90, 
91, 92, 100, 109, US 

provides control of Interpolation of gas 
thermodynamic and transport properties 

99 

THERM 1 

102, 105 

98 

computes gas properties as a function of 
total enthalpy, velocity, temperature and 
species rrole fractions 

100 

THETPM 

98, 106, 105,44, 23 

34, 70, 78 

th,3 subroutine evaluates Prandtl-Meyer 
equation 

10 L 

THRUST 

69. U? 

70 

starting line integration and wall pressure 
Integration are performed here 

LOZ 

THEY 


11, 86. 99. 104. 105 

computes and interpolates thermodynamic 
properties from thermodynamic tables which 
are input 

103 

TOFEM 


66, 70, 113 

computes temperature as a function of 
Mach number 

104 

TOFENH 

102, 44 

58 

computes temperature as a function of total 
enthalpy and velocity 

105 

TOFH 

102,44, 76 

35, 55, 78, 99, 100 

computes temperature as a function of total 
enthalpy, velocity and species mole fractions 

106 

TOFV 

23, 46 

4,21,26,31,65,77,78, 

100 

computes temperature as a function of velocity 

107 

TRACE 

80, 28, 16 

65 

s 

108 

TRANS 

96, 65 

19 

♦ 

109 

TURN 

98,21, 110,24,44, 
111,23 

70.91 

computes shock angle and downstream 
properties for known turning angle 

no 

UOFEM 

23,46 

66. 109, 111 

Mach angle as a function of Mach number 

111 

UOFV 

110,21 

8, 31, 50,55,63,70,71 
72, 78, go, 91, 92, 95. 109 

Mach f ngle as a function of velocity 

112 

VEMAG 

16 

42, 61, 101 

computes magnitude of a vector 

113 

VOFEM 

103 

55, .0, 81, 82, 95 

computes velocity as a function of Mach number 

114 

WDCI 

80 

65 

s 

115 

WEAK 

98, 21,75, 83, 22, 
14 

24 

computes properties downstream of an Ideal 
gas shock wave 







Table 3-3 {Concluded) 


Subjiroutines 

Calls Following 

Called by Following 

Description 

Nu, 

Name 

Boutin e(s) 

Routlne(s) 

L16 

WOFA 

“ 

3,24 

one -dimensional mass flow as a function of 
area relation 

117 

WTFLO^ 

- 

30 

computes area bounded by two data points 

118 

XSl 

- 

26, 32 

computes storage location and retrieves data 
from the XSIDIM array 


^Reference 7 
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3.1 CAPABILITIES AND LIMITATIONS 


The RAMP computer program described in this document can be used 
to solve a wide variety of problems associated with real gas. supersonic, 
compressible flow. Some of the more important, basic capabilities of the 
existing program are outlined below: 


• The gas may be ideal or real. If the gas is real; frozen, 
equilibrium, or non-equilibrium chemistry assumptions 
can be made. The effects of oxidize r/fuel gradients may 
be considered. 

• Two-dimensional or axisymmetric flow problem geometries 
can be used. 

• Both upper and lower boundaries can be solid or free. (A 
soldr boundary can be approximated by either a conic or 
polynomial equation.) (Two-phase problems require the 
nozzle centerline as a lower boundary). 

• A nozzle wall may be curve fit with discrete points. 

• Compression corners on the upper wall can be calculated. 

• Any number of expansion corners can be considered on 
either the upper or lower wall. 

• Various methods for obtaining an Initial start line are 
utilized. 

1. The program will calculate a one -dimensional 
start line anywhere in the nozzle. 

2. The program will »-alculate a start line at points 
within the nozzle necessary to conserve mass. 

3. Data on a normal surface can be input at points 
across the flow field within the nozzle or in the 
plume. 

4. An exit plane startline can be punched. 

5. The program can be restarted from the startline 
punched in 4 above. 

• Hypersonic or quiescent approach flow options may be 
used. 

• Exit to ambient pressure ratios from over -expanded to 
highly under-expanded are possible. 

• Displacement of the axis of symmetry from the center 
of flow (i.e., the plug nozzle flow field) is possible (for 
gas only cases). 
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• Due to computer core size limitations the code presently 
consists of two versions: (1) an equilibrium chemistry 
version, and (2) a finite rate chemistry version. The 
finite rate version has all the capabilities of the equi- 
librium programs with the following exceptions: 

1, Free molecular flow 

2. Shock Waves 

It is anticipated that one version will be released at a 
later date. 

• The equilibrium version which accompanies this docu- 
mentation will handle only attached (over -expanded 
nozzles or compression corners) right-running shocks 
(see sketch below). The logic for calculating left- running 
shocks, and coalescing shocks is in the code but has not 
been thoroughly checked out. When check out is com- 
pleted, the program modifications will be forwarded to 
users. 



Over-Expanded Nozzle with Right- Attached Right-Running Shock 

Running Shock 

• There is presently a maximum of 100 points on a normal 
and 50 input points. 

• Reacting gas solutions which are in chemical equilibrium 
have been facilitated by modifying the TRAN 72 computer 
program as described in Section 2 to provide binary tape 
and punched output of its equilibrium or frozen real gas 
calculations at any desired O/F ratio(s). The RAMP pro- 
gram has the capability for selecting the proper case from 
a large set of real gas proper"^ies cases stored on a master 
tape. The method of generating this master tape is outlined 
in Table 3-5. Cases stored are uniquely identified by some 
characteristic of the particular gas under consideration. 

For example, a L 1 OX/LH 2 system may be identified by the 
following: 

Gas Type Mixture Ratio Chamber Pressure 
02/H2 O/F = 1.5 - 8.0 PC = 546.0 


3-16 


LOCKHEED - HUNTSVILLE RESEARCH & ENGINEERING CENTER 



£ 


f 


I 



New cases of general interest may be added to the master 
tape; however, ad hoc cases should be prepared on a sepa- 
rate tape, Tape preparation sequence and communication 
with the RAMP program is diagrammed in Table 3-5. 

• Once the gas -particle flowTeld solution has been obtained, 
the output tape may be usea by the RAMP Radial Lookup 
Program (described in Appendix A) which determines the 
radial variations of flowfield properties across the nozzle 
and plume flowfields at constant axial stations. The Plume 
Impingement Program (PLIMP) (Ref. 9) may also be run 

to determine the effects of the rocket exhaust plume on 
objects immersed in the plume. Sequencing and commun- 
ication of auxiliary programs with the RAMP program is 
shown in Table 3-5. 

• Two-dimensional or axisymmetric solutions are selected 
by simply loading a control word in the program input 
data, This integer (0 or 1) is then multiplied by the term 
containing (l/r) in the governing differential equation. By 
appropriate description of the flow boundaries, it is possible 
to change from a solid to free boundary on either the upper 
or lower walls. Conversely, it is not possible to change 
from a free to a solid boundary on either wall. 


3-17 


I 


LOCKHEED • HUNTSVILLE RESEARCH & ENGINEERING CENTER 




- . - -**8 .■> . 


Table ?-6 

SEQUENCING AND COMMUNICATION OF AUXILIARY PROGRAMS WITH THE RAMP PROGRAM 
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3.2 USKR'S INPUT GUIDE FOR THE RAMP PROGRAM 

This section outlines in detail the procedures for using the Reacting 
and Multi-Phase (RAMP) Computer Program. Each card and its use is 
explained in Section 3.2.1. The program magnetic tape assignments are 
given in Table 3-6. 


3.2.1 RAMP Program Input Information 


The input data are organized into sections determined by thtir use. 
The description of these cards is given below. 


RAMP Computer Program Input Instructions 


Card«? 1-3 


Column 


Problem Description 
Required 

Parameter 


1-240 HEADER 


Card 4 

Column 


Run C jntrol Card 
Required 

Parameter Value 


Format 3{20A4) 


Description 

Problem description may be 
put on three cards; however 
only the first 120 columns will 
be printed while all 240 char- 
acters will be written on the 
data tape. All three cards 
must be present even if olank. 

Format 1615 (Right Adjusted) 
Description 


5 ICON(l) 1 

Gaseous thermo- 
dynamic data con- 
trol parameter 

2 


3 


The gas composition is either 
chemically frozen and/or in 
chemical equilibrium. The gas 
properties are read directly 
from cards 8, 9. 10 and 1 1. 

Same as ICON(I) = I except gas 
properties are read directly 
from a data tape mounted on 
FORTRAN unit 10. 

The gas composition is in chem 
ical non -equilibrium. The gas 
properties are determined, as 
a function of temperature in 
thermodynamic data ‘cables in- 
put on cards 13. 
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Card 4 


Column Parameter Value 

5 ICON(l) 4 

8-9 NTAPE N 


10 ICON (2) 

Start line control 
parameter for gas 
only solution 


or 


Startline control 
parameter for gas 
particle solution 

13 ICON(3) 

Control manner in 
which points along 
the startline are 
spaced 


14, 15 ICON(3) 


Description 

Same as ICON{l)=3 except gas 
composition is chemically frozen. 

If lCON(2)=2, tape unit number 
for startline if not input from 
cards. The program defaults to 
unit 5 (read cards) for ICON(2)=2, 
If lCON(2)/2 and a two -phase 
transonic solution is being per- 
formed NTAPE is the unit on 
which the transonic startline 
will be written. In this case 
the program defaults to unit 8. 

0 Generate stx'aight startline with 

Mach number given, 

1 Generate source startline with 

A/A* given 

2 Startline input from cards or 

tape, 

3 Generate startline by conserva- 

tion of mass using a linear Mach 
number distribution, 

0 Generate startline using transonic 

approximation . 

2 Startline input from cards. 

0 Points are spaced according to 
a sine distribution, 

1 Points are evenly spaced (recom- 
mended) 

2 Points are evenly spaced on a 
circular arc based on the input 
value of the upper limit of the 
startline (card 18,CORLIP(2)) 

NOTE: This option is necessary 
only if program is to set up its 
own gaseous startline. 

Number of startline points. 
Maximum of 50 (right adjust) 


’NOTE: If particles are present and supersonic startline is generated by 
transonic approximation then total number of points on startline may be 
adjusted by transonic program depending on particle distributions. 
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Card 4 (Continued) 

Column Parameter Value Description 

16-20 ICON (4) Upper boundary specification 

indicator. If specifying upper 

Number of upper boundary by equations, set equal 

oundary equations number of equations to be used. 

Maximum of 100. Right adjust. 

Option for ICON (4) when upper boundary is described by individual points and 
slopes 


I CON (4) 


INOOO + Number of discrete points (no boundary equation 

following last point) (slope at each point in radians) 

2NOOO + Number of discrete points + 1 (an upper boundary 
equation follows last point) (slope at each point in 
radians) 

3N000 + Number of discrete points (no boundary equation 

following last point) (slope at each point in degrees) 

4N000 + Number of discrete points + 1 (an upper boundary 
equation follows last point) (slope at each point in 
degrees) 


N ~ number of points to use for Lagrangian Integration (5 max). 


If N is set to zero, a linear assumption will be made. 


NOTE; If a nozzle is being run the throat must also be specified by discrete 
points. 


Column Parameter Value 

21-25 ICON(5) 

Number of lower 
boundary equations 

30 ICON(6) 0 

35 lCON{7) 0 

Flow type option 

1 

38 INOZ 2 

39 ICON (8) 0 

Data output con- ^ 

tJ.ol, used in con- 
junction with ICON (16) 


Description 

Lower boundary specification 
indicator. Same description 
and option as ICON(4). 

Not presently used 

Two-dimensional flow problem 
geometry. 

Axisymmetric flow problem 
geometry. 

Calculp.tions terminated at 
nozzle exit. 

Full printout 

Print only boundary, shock, input 
Prandtl-Meyer , and particle limit- 
ing streamline points. 
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Card 4 (Ccintinued) 

Column Parameter Value 

40 ICON'S) I 

2 

3 

42 MORFT 

Compliments I CON (9) q 

1 

2 

3 

4 

43 ICON(9) 0 

Units indicator , 


44-45 

ISPECS 


48-50 

ICON(IO) 


51-55 

ICON(ll) 


60 

ICON(12) 

0 



1 

61 

ICON (13) 

0 


1 

3-22 


Description 

Print 1 line (R., X, M, 0, S and 
shock angle) 

Print above plus Mach angle, 

P, P, T, V. 

Print all of above plus MWT, 

7, Tcf, per, 

For English system of units. 

Dimensions are in feet. 

Dimensions are in inches. 

For metric system of units. 

Dimensions are in centimeters. 

Dimensions are in meters 

System of units specified by user. 

Use English system of units. 

Use metric system of units. 

This option controls the units in 
which the flow field is calculated. 
The program assumes that the 
boundary equations are input in the 
same units as the units indicator 
(ICON(9;). This option will not 
override the units specification on 
cards 8 and 30 but will convert the 
units of the gas and particle thermo 
dynamics to correspond to the units 
of this indicator. 

Number of discrete particle sizes 
used to represent particle distri- 
bution (10 max). If gaseous only 
flow set equal to 0 (right adjust). 

Maximum iterations allowable 
for each point in flow field. If 
set to 0 program assumes value 
of 100. Right adjust. 

Case number printed at top of 
each page. 

Calculate shock wave. 

No rotation option, 

Flowfield data will be output on 
FORTRAN unit 3. 

Data will not be written on tape. 
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Card 4 (Concluded) 


Column 

Parameter 

Value 

Description 

65 

ICON (13) 

0 

Free molecular calculations will 
not be considered. 



1 

Free molecular calculations 
will be considered. 

68-70 

lCON(l4) 

0 

No intermediate printout in 
solution iteration. 



N 

Print intermediate results for 
N^^ line. Right adjust. 

71-75 

IC0N(15) 

0 

No intermediate printout. 



M 

Print intermediate results from 
point on each line from the 
Nth (ICON (14)) line on. Right 
adjust. 

76 

ICON(l6) 

0 

No punched cards output. 



1 

Punch data line at nozzle exit 

77-78 

ICON(l6) 

0 

N 

Print every line. 

Print every N^h line (use with 
ICON (8)). Put 0 in column 77 
if N < 10. 

79-80 

ICON (16)* 


Time (SEC) before end of allotted 
run time when new startline is to 
be punched. Put 0 in column 79 
if time less than 10 seconds. 

5 

Finite Rate Chemistry 
Run Control Card (Re- 
quired if ICON (1)>2) 

Format 815 (Right Adjusted) 

Column 

Parameter 

Value 

Description 

1-5 

NT 


Number of temperature points in 
thermodynamic data tables. 

6-10 

NS 


Number of gaseous species (ex- 
cluding 3rd bodies) 

11-15 

NM 


Number of 3rd bodies. 

16-20 

NR 


Number of reactions specified. 

25 

NPRINT 

0 

No intermediate printout in 


chemistry calcuiitions, 

1 Echo print of input data. 

2 Print intermediate results of 

chemistry calculations. 

NOTE: Applicable for Univac 1108 only. 
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Card 


Card 


5 (Continued) 


Column 

30 

Parameter 

ICTAPE 

Value 

0 



1 

35 

KGUP 

>2 

40 

IDIDO 

0 



1 


Description 

Species concentrations for start - 
line read directl/ from cards. 

Species concentrations read di- 
rectly from a data tape mounted 
on FORTRAN unit 10. 

Number of normals calculated 
before finite rate chemistry 
contributes to dS and dH. 

Uniform species concentrations 
along startline. 

Non-uniform species concentra- 
tions along atartline. 


6 Upper Boundary Description 

Required 

IfICON(4) < 10000 use following format (1 1, 3X, 1 1, 5X, 6E10.6) . 


Column Parameter 

1 IWALL(K, 2) 


Value Description 

1 Conic equation 

R = A[(B+CX+DX^) ' +E] 

Represents throat region. (See 
page 3-27 for an example and 
description.) 

2 Polynomial equation 

R = AX^+BX^+CX^+DX+E 

3 Free boundary equation 

P = P (1+E X)(l+v (M sin(9„-9 ))' 
00 00 'oo 00 B 00 


5 I TRAN (K, 2) 


(See page 3-27 for an example and 
description,) 

6 Same as IWALL=3 except oblique 

shock solution for plume boundary. 

Use if 1.5 < M < 5.5. 

00 

0 No discontinuity follows this 
equation. 

1 Expansion corner follows. 

2 Compression corner follows. 
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Card 6 (Continued) 


Column 

Parameter 

Value 

Description 

U-20 

WALLCO(K, 1, 2) 


Coefficient A or P (psfa or 

N/m ). (Units must be con- 
sistent with R in ft or m.) 

21-30 

WALLCO(K, 2, 2) 


B or y 

00 

31-40 

WALLCO(K, 3, 2) 


C or M 

00 

41-50 

WALLCO(K,4, 2) 


D or 9 (deg) 
00 

51-60 

WALLCO(K, 5, 2) 


E or E 

00 

61-70 

WALLCO(K, 6, 2) 


Maximum value of X applicable 
to equation (feet If ICON (9) -0 
meters if lCON(9)-l). 

71-80 

RSTAR 


Throat radius (ft or m) required 
only on card for last equation. 
This is required for two-phase 
transonic solution, only. 

If 10000 < 
5X.3E10.6). 

ICON (4) < 20000 use 

following format (15, BX, 3E10.6, 15, 

Column 

Parameter 

Value 

Description 

5 

I TRANS (K, 2) 


Same as before. 

11-20 

WALLCO(K, 3, 2) 


Axial displacement (X) of point 
K (ft or m). 

21-30 

WALLCO(K, 1,2) 


Radial displacement (R) of point 
K (ft or m). 

31-40 

WALLCO(K, 2, 2) 


Wall angle (9) at point K (rad) . 

45 

ITRANS(K+1,2) 


Same as before. 

51-60 

WALLCO(K+l, 3, 2) 


X at point K + 1 (ft or m). 

61-70 

WALLCO(K+l, 1, 2) 


R at point K+1 (ft or m) . 

71-80 

WALLCO(K+l, 2, 2) 


9 at point K+1 (rad). 

NOTE: Card 6, 

in the above format, 

is repeated for each equation until all 


necessary equations have been input. That is, repeat Card 6, in succession 
in order of increasing XMAX, for K=l, 2, . . . , ICON (4), All units for lengths 
for two-phase calculations are consistent with lCON(9), otherwise units for 
lengths are input at user's discretion. 
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REPRODUCIBILrrY OF THE 
ORIGINAL PAGE IS POOR 


Repeat Card 6, in above format, in succession, and in order of increasing 
X, until all required points have been input. 

If 20000 < ICON (4) < 30000 the above format is used except the last 
segment of the upper boundary is input via an equation. The equation is input 
with the format for ICON (4) < 10000 except the throat radius RSTAR is not 
required. 

If 40000 < ICON(4) < 50000, the format for 20000 < ICON(4) < 30000 is 
used except 9 is input in dimension of degrees. 

Card 6a Format E10.6 

Card 6a is used only when running a two -phase case where the upper 
boundary (nozzle wall) is specified by discrete points (lCON(4) > 10000). Do 
not input this card for any other cases. 

Column Parameter Value Description 

1-10 RSTAR Throat radius (ft or m) . 

Card 7 Lower Boundary Description 

Requireu 

The formats and options for Card 7 are controlled by ICON(5) and are 
the same as for Card 6 (Upper Boundary) with the following exceptions: (1) 
the distance from the nozzle throat to the center (X=0) of the coordinate sys- 
tem for the wall equations is read in place of RSTAR. This is only necessary 
for two-phase cases where a transonic solution is desired and where X;^0 at 
the nozzle throat. This distance is positive if the center of the coordinate 
system is downstream of the throat and negative if the center of the coordinate 
system is upstream of the throat. It is not possible to run a two-phase case 
with the lower boundary specified by points, therefore there is no Card 7a; 

(2) the indices of the parameters are (—,“■, 1) instead of (~, ~, 2), e.g,, 
■WALLCO(K, 1, 1) instead of WALLCO(K, 1, 2). A nozzle throat region showing 
the coefficients of a circular throat and free boundary are shown in the sketch 
on the following page. 
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RC ~ radius of curvature of the 
circular arc of the throat 
RT = throat radius 
XO " axial distance from the origin 
of the coordinate system to the 
throat 

0 * throat divergence angle corre- 
sponding to the maximum value 
for which the throat conic equa- 
tion applies 


The conic equation for this case would have the following form: 

A = -1 for an upper equation, +1 for a lower equation (-1 for this case) 
B = RC^ - XO^ 

C = 2X0 
D = -1 

E = -(RC + RT) 

Xmax = RC sin0 + XO 


An example of a free boundary is shown in the sketch below. 



The free stream approach flow is 
inclined at 15 deg to the plume with 
a gamma (V) of 1.4, a Mach number 
of 10, and a static pressure of 0.1 
psfa. 


PINF = 0.1 (psfa) 

E = 0 (No pressure variation with axial distance) 
GAMMAINF = 1.4 
MINF = 10 
THETAINF = -15° 
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Card 8 


Gas Property Control 


Format 6A4, 5X, A^, 6X. 12, 3X, 12 


Card 


Card 


This card is required whether gas data input by cards or tape. 


Column 

Parameter 

Description 

1-24 

ALPHA (I) 

Gas name for real gas on tape (see 
Section 2, page 3). If inputting gas 
data via cards, may be any name. 

30-32 

UNITS 
(Independent 
of IC0N(9)) 

ENG Input gas data with English 
units (cards only). 

MKS Metric units (cards or tape)* 

39-40 

lOF 

Number of O/F tables for gaseous 
only solution or 

number of gas total enthalpy tables 
for two-phase solution 

44-4 5 

IS 

Number of entropy tables per IGF 
entry, 1 for gas, 2 maximum for gas 
chemical equilibrium solution. 

9 

Mixture Ratio or Total 
Enthalpy (This card is 
not used if ICON “( 2) 

Format E10,6,8X,I2 

Column 

Parameter 

Description 

1-10 

OFRAT(M) 

For gaseous only flow input O/F ratio, 
for particle flow input gas total enthalpy 
(cal/gm for metric, Btu/lbm for English 
units specified by Card 8). 

10 

Entropy 

(This card is not 
used if ICON (1)^2) 

Format S10.6, 8X,I2 

Column 

Parameter 

Description 

1-10 

STAB(M. I) 

Entropy of gas ical/gm-'"'K oi Btu/lbm- 
units specified by Card 8). 

19-20 

IVTAB (M, I) 

Number of Mach numbers for this 


entropy value (13 max). 
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Format 8E10.6 


Card 11 Gas Properties 

(This card is not used if 
ICON(l)_>2; units specified 
by Card 8) 


Column 

Parameter 

Description 

1-10 

XSIDIM(l) 

Mach number associated with 
above entropy. 

11-20 

XSIDIM(2) 

Molecular weight of gas (gm/g- 
mole or Ibm/lb-mole). 

21-30 

XSIDIM(3) 

Gamma (C /C ) 

p' V 

31-40 

XSIDIM(4) 

Temperature (°K or °R) 

41-50 

XSIDIM(5) 

Pressure (atm) 

51-60 

XSIDIM(6) 

Prandtl number (dimensionless) 

61-70 

XSIDIM(7) 

Absolute viscosity (poise) 

71-80 

XSIDIM(8) 

Ideal gas (1 velocity cut per 
table) — viscosity temperature 
exponent. Real gas — C^ (cal/ 

gm-°K or Btu/lbm-°R). 


To illustrate the arrangement of Cards 9, 10 and 11, let 10F=2 and 1S=2; 
then the proper arrangement is; 


Card 9 


10 


11 

(1-13 such cards) 

10 


11 

(1-13 such cards) 

9 


10 


11 

(1-13 such cards) 

10 


11 

(1-13 such cards) 


Card 12 Gas Properties Format 3E10.6 

(This card is required 
if ICON(l)>2) 

Column P arameter Default Description 

Value 


I- iO PR 0.7 Prandtl nunnber (dimensionless). 

II- 20 VISO l.OE-04 Absolute Viscosity (poise), 
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Card 12 (Continued' 


Column 

Parameter Default 

Description 


Value 

21-30 

EX 0.6 

Viscosity temperature exponent. 

Cards 13 

Gas Thermodynamic Data 
(The following cards are 
required if ICON(l)>2) 



The following set of cards contain species thermodynamic data. The 
first card contains the species name, molecular weight and heat of formation. 
The second and remaining cards contain the temperature and corresponding 
specific heat, entropy and enthalpy for that species. Two temperatures and 
corresponding thermodynamic data are placed on each card. The input table 
can contain up to a maximum of 30 temperature points. The data are input 
exactly as presented in the JANAF tables (Ref. 10) with t'le temperature points 
being the same for all species. Cards 13.1, 13.2, 13.3, etc., are repeated for 
each species. 

Card Column 

13.1 1-6 
7-16 
17-26 

13.2 1-10 
11-20 

21-30 
31-40 

41-50 
51-60 

61-70 
71-80 

13.3 1-10 

etc. 

3-30 


Description 

F ormat 

Name of first species 

A6 

Molecular weight 

E10.3 

Heat of formation, ^*298 

E10.3 

First temperature point (°K) 

F10.4 

c (cal/mole-^K) 

F10.4 

Pi 


S. (cal/mole-°K) 

F10.4 

N " *^298 

F10.4 

Second temperature point (°K) 

F10.4 

c (cal/mole-°K) 

F10.4 

S. (cal/mole-°K) 

F10.4 

*^i“*^298- 

F10.4 

Third temperature point 

F10.4 
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Cards 14 Catalytic Species Weighting Factor Data 

(The following cards are required if 
ICON(l)>2 and NM>0) 

The following set of cards specify the catalytic species (Ml, M2, M3, . . . ) 
and their respective composition in terms of the species participating in the 
reactions. Weighting factors must be read in the same order in which the 
thermodynamic data sets are read. 


Card Column 

14.1.1 1-6 

14.1.2 1-5 
6-10 


Description Format 

AID(NS+1) — Name of first catalytic species A6 
(e.g.. Ml) 

WF(1, 1) — Weighting factor of first species 16F5.2 

(for first catalytic species). Set weighting 

factor to zero for any reactant which does 

not contribute to the respective catalytic 

species. 

WF(1, 2) — Weighting factor of second species 
contributing to first catalytic species. 


75-80 

14.1.3 1-5 

14.2.1 1-6 

14.2.2 1-5 

14.NM.1 1-6 


WF(1, 16) — Weighting factor of l6th species 
contributing to first catalytic species. 

WF(l, 17) — Weighting factor of 17th species 16F5.2 
contributing to first catalytic species, etc, 

AID(NS+2) — Name of second catalytic A6 

WF(2, 1) — Weighting factor of first species 16F5.2 
contributing to second catalytic species, etc. 

AID(NS+NM) — Name of last catalytic A6 

species, etc. 


Cards 15 Chemical Reaction Mechanisms 

(The following cards are required 
if lCON(l)>2 and NR>2) 


The following set of cards specifies the chemical reaction mechanisms 
for a particular problem, one card for each reaction. No particular order is 
required. 


Card 

Column 

Description 

F ormat 

15.1 

1-6 

Species A 

A6 


7 

+ sign 



8-13 

Species B (or M) 

A6 
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Cards 15 (Continued) 


Card Column Description F ormat 


15.1 

14 

+ sign 



15-20 

Blank (or M) 

6x(A6) 


21 

= sign 



22-27 

Species C 

A6 


28 

+ sign (if needed) 



29-34 

Species D (or M) 

A6 


35 

+ sign (if needed) 



36-41 

Species E (or M) 

A6 


42-48 

Blank 



49-50 

Reaction type, 1 to 12 

12 


51 

Rate constant type, 1 to 5 

11 


52-59 

A, pre- exponential factor (cm- 
particle-sec units) 

E8.2 


60-64 

N, temperature exponent 

F5.2 


65-74 

B, activation energy (cal/mole) 

FlO.l 


75-80 

M, temperature exponent 

F6.2 

15.2 


Next reaction 


15. NR 


Last reaction 


Cards 

16 Startline Data Format 

(The following cards are required 
if ICON(l)>2 and ICTAPE=0) 

7E10.3 


The following cards contain the species mole fractions on the startline 
Mole fractions must be read in the same order in which the thermodynamic 
sets are read. 


Card C olumn Description 

16,1 1-10 Mole fraction of first species at the first point on the 

startline. 


61-70 Mole fraction of seventh species at the first point on 
the startline. 
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Cards 16 (Continued) 

Card Column Description 

16.2 IwlO Mole fraction of eighth species at the first point on the 

startline. 

■ 

* 

» 

61-70 Ivioie fraction of the fourteenth species at the first point 
on the startline. 

m 

* 

etc. 

Cards 16.1 and 16.2, etc., are repeated for each point on the startline. 
For a uniform startline (IDIDO=0), mole fraf:tions are read for 1 point only. 


Card 17 Chamber Condition Data Format 2E10..3 

(This card is used if ICON(l)>2 
and ICTAPE=0) 


Column 

1-10 

11-20 


Parameter Description 

PC CViiiinber pressure (atm) 

TC Chamber temperature (°K) 


Card 18 Startlir.e Data Format 8E10.6 

(This card is not used if ICON (2) =2 
or for gas particle flow). 


Use Card 18a if ICON(l)<2. Use Card 18b if ICON(l)>2. 


Card 

* 

18a 


Column 

1-10 

11-20 


Parameter 

CORLIP(2) 

COR LIP (6) 


21-30 CORLIP(4) 

31-40 CORLIP(5) 
41-50 CORLIP(8) 


Description 

Axial coordinate of upper limit of startline 
(ft or m, see Fig. 3 -la) 

Axial coordinate of lower limit of startline 
(ft or m, see Fig. 3-la). (If ICON(3) point 
spacing option = 2 this value is recalculated 
using CORLIP(2)). 

Mach number (ICON(2)=0) or A/ A* (ICON(2) = l) 
for startline 

Entropy of startline (cal/gm/°K or Btu/lbm/°R) 
Mixture ratio (O/F) of startline 


Card 18a is used to input the gas startline information when the gas chemical 
equilibrium, frozen or ideal gas option is utilized in the solution. 
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Card 18 (Continued) 


Card 

Column 

Parameter 

Description 

18b* 

I-IO 

CORLIP(2) 

Axial coordinate of upper limit of start- 
line (ft or m, see Fig. 3-la) 


11-20 

COR LIP (6^ 

Axial coordinate of lower limit of start - 
line (ft or m, see Fig. 3 -la) 


21-30 

CORLIP(4) 

Mach number (ICON (2) *0) or A/ A* 
(IC0N(2)=1) for startline 


31-40 

P 

Pressure for startline (atm) 


41-50 

T 

Temperature for startline (^R or *^K) 

Card 19 Startline Data 

Format 6E13.7 


Do not use this card if ICON(2)/^2 or for gas-particle flow. Use feet 

if ICON (9) =0, meters if ICON (9) =1. 

Use Card 19a if ICON(l)<2, Use Card 19b 

if ICON(l)>2. 




Repeat this card in succession and in order of increasing R for 1::1, 2, . . . 

ICON (3). 



Card 

Column 

Parameter 

Description 

19a 

1-J3 

R 

Radial coordinate (R) of point I on 
startline (ft or m) 


14-26 

X 

Axial coordinate (X) of point I (ft or m) 


27-39 

EM 

Mach number at point I (dimensionless) 


40-52 

THETA 

Flow angle at point I (deg) 


53-65 

S 

Entropy at point I (cal/gm/°K or Btu/ 
lbm/°R) 


66-78 

OF 

Mixture ratio at point I (O/F) 

♦ 

19b 

1-13 

R 

Radial coordinate (R) of point I on start - 
line (ft or m) 


14-26 

X 

Axial coordinate (X) of point I (ft or m) 


27-39 

EM 

Mach number at point I (dimensionless) 


40-52 

THETA 

Flow angle at point I (deg) 


53-65 

T 

Temperature at point I (*^R or °K) 


66-78 

P 

Pressure at point I (atm) 


sfci 

This card is used to input the gas startline information when the gas chemical 
non -equilibrium option is utilized in the solution. 

See footnote on previous page. 
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Card 20 Cutoff Limits Data Format 8E 10 ,6 

JRequlred (See Flg, 3 -lb) 


Column 

Parameter 

Description 

:-io 

CUTDAT(l) 

Radial coordinate defining upper limit of 
calculation regime (ft or m) 

11-20 

CUTDAT(2) 

Axial coordinate defining upstream cutoff 
limit (ft or m) 

21-30 

CUTDAT{3) 

Angle upper limit of calculation regime 
makes with horizontal (deg) 

(' HI 

f 

o 

CUTDAT(4) 

Radial coordinate defining downstream 
cutoff limit (ft or m) 

41-50 

CUTDAT(5) 

Axial coordinate defining downstream 
cutoff limit (ft or m) 

51-60 

CUTDAT{6) 

Angle downstream cutoff line makes with 
horizontal (deg) 

Card 21 

Mesh Control 

Fromat 8E10.6 


Required (See 

Section 3,5.1) 

Column 

Parameter 

Description 

1-10 

STEP(3) 

Interior point insertion criteria (ft or m). 
See Section 3.5.1* 

11-20 

STEP(6) 

Axis point insertion criteria (ft or m). 
See Section 3.5.1. 

21-30 

STEP(9) 

Particle limiting streamline insertion 
criteria. 

31-40 

STEP(7) 

Point deletion criteria. 

41-50 

STEP(l) 

Prandtl-Meyer integration step size (deg) 

51-60 

STEP(8) 

Interpolation factor for calculating lower 
wall. 
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*w 







Flg.3-la - Startline Geometric Set-Up 

Rj CUTDAT(l) 

Xj CUTDAT(2) 

0j CUTDAT(3) 

R 2 CUTDAT(4) 
CUTDAT(5) 

02 CUTDAT(6) 

Normal terminated 
by downstream 
cutoffs. 

m 

^ 2^2 © Normal terminated 

by plume boundary. 

NOTE: The normals must terminate on an upper 
boundary. Therefore, Rj.X^, 0^ must have 
values such that the cutoff box will alwav s 
be above the plume or solid boiuidary. The 
code will attempt to fill up the cutoff box 
with normals until fewer than six points 
remain on the normal. 



Fig. 3 -lb - Cutoff Limits 
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Card 22 

Free-Molecular Control Variables FormM 6E1Q 6: > 

(This card is not used if ICON(l3)sO) 

Column 

Parameter 

Description 

1-10 

VIBNO 

Reciprocal of the Knudsen number at which 
the vibrational energy mode thermally freezes 

11-20 

ROTNO 

Reciprocal of the Knudsen number at which 
the rotational energ y mode thermally freez es . 

21-30 

TRANNO 

Reciprocal of the Knudsen number at which 
the translational energy mode thermally 
■ freezes. . --v- 

31-40 

CHARL 

Characteristic length used in the Knudsen 
number calculation (nomally the nozzle 
exit radius). 

41-50 

VISCC 

Reference viscosity (poise) if not input in 
thermo tables. 

51-60 

CONMM 

Viscosity relation temperature exponent 


if not input in thermo tables. 

Cards 23 through 35 are input onl/ for two-phase solution. 

Card 23 

Column 
4 


5 


6-10 


Particle Solution Control 
(Use only if ISPECS >0) 


Format 1615 


Parameter Value 


IZO 


IWRITE 
(particle print 
flag) 


IDRAG 


0 

1 

0 

1 

2 

0 

1 


~ ne~5crdpti on 


Nozzle wall equations are referenced to the 
nozzle throat. 

Nozzle wall equations are referenced to the 
nozzle exit plane. 

1 line of print for each particle (V,9, AM, 
h. P. T) 

Above plus Re, AV, AT, viscosity, C^, Pr 

All of above plus T , P , C^/C_„, Nu/Nus, 
A, B o o u uo 

Use drag table coded in Kliegel program 
(Ref. 7). 

Use C. J, Crowe drag table coded internal 
to program (Ref. 11). 
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Card 23 

Column 

14-15 

18 

;^ 24 ^ ; ^ 

25, 30 

6*5 

Card 24 

Column 

1-10 

Card 25 

C olumn 
1-10 


(Continued) 

Value Description 

0 Startline calculated by program 
(ICON(?.);^2) 

N Number of startline points at which 

particles are present for given startline. 
ICON (2) =2, N < ICON (3). Right adjust. 

IPCHS 0 No punch. 

1 Punch startline from transonic program, 

JTEM(l) The elements of the JTEM(M)' arrary indi 

cate which temperature/enthalpy table is 
to be used for particle species M. The 
value of JTEM(l) is always set equal to 
1 for particle species 1, 

Indicates that the particle species M 
temperature/enthalpy table will be the 
same as that for particle species 1. 

Cards 30, 31 and 32 are not required 
for particle species M. 

M Indicates that the particle species M 

temperature/enthalpy table will be input 
on Cards 30, 31 and 32 as Table M. 

N Indicates that the particle species N 

temperature/enthalpy table will be the 
same as that for particle species M. 
(N<M). Cards 30, 31 and 32 are not 
required for particle species N. 

Particle Format 8E10.6 


JTEM(M) 0 

M = 2, ISPECS 


Parameter 

NSETS 


Parameter Description 

XMASSP Ratio of particle total mass flow rate 

to gas mass flow rate. 

Particle Mass Flow Format 8E10.6 

Rate Fractions (Use only if 
ISPECS >0) 

Parameter Description 

PERTG(l) Ratio of particle No. 1 mass flow rate 

to total particle mass flow rate. 
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Card 25 (Cofttinued) ’ ' 

Colnmn ■ Parattiet er .. y : JDegcription ■ 

H-20 PEiR|TG{2) o£ partic^ NOi,2 mass flow 

to total particle ihafcis flow ^ 

y : t ' ; ’ ,^. ,.• ■■.'.'■/■■' i ^ \:y I' ■ ' 

■’•■’’ ■'■■\: .■:-■■•■. ■■ ■■; . ■•'. ;■ . .. ■■:'."••••. ■' *., -. ' . , '•' ' 

^ Ratio of particle Nrt.ISPilCS ma^^^^^^ 

rate to total particle mass flow rate, 

Car4 26 Particle Size Data. Format 8 E 10 . 6 

(Use only if ISPECS> 0 ) 

Column ■". .''': Parariaeter DesCriPtibn 

PSP (2 » 1) Radius of particie No* 1 

PSP(2*ISPECS) ^ Radius of particle No. ISPEGS (tnicrona) , ' . 

Card 27^^^^^^^^ Format 8E 10 .6 

(Use only if ISPECS>0) 

Column Parameter Description 

1-10 PSP(i, 1) Mass density of particle No. 1 (Ibm/ft^, 

or kg/m^) 


Q 

B 

fl 

0 


PSP(1,ISPECS) Mass density of particle No. ISPEGS 

(Ibm/ft^, or kg/m^). 

Card 28 Emissi’Hty Data* Foriinat 8E10.6 

(Use only if ISPECS>0) 

(e in Eq. (3.6)) 

Column Parameter Description 

1-10 EMISS(I) Emissivity of particie No, 1 . 


EMISS(ISPECS) Emissivity of particle No. ISPEGS 



The emissivity and accommodation coefficients are used to determine the local 
energy exchange between the gas and particles via radiation* ^ The y^ 
produce negligible affects on solution and usually are Set to 0 (zero). 
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Catd 29 


REPRODUCIBILITr OF THE 
ORIGINAL PAGE IS POOR 


Accommodation Coefficionts 
(Use only inSPECS>0) 

(d in Eqv(3i6) 


Format 8E10.6 


units) . 


^The emissivity and accommodation coefficients are used to determine the local 
energy exchange between the gas and particles via radiation. They normally 
produce negligible affects on solution euid usually are set to 0 (zerb). 
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s 

i 


6 


Column 

Parameter 

Description 1 

I-IO 

. 'p' 

ACC(iy 

Accommodation coefficient of particle 

No. 1. 1 

« 

, • ■■ ■ \ 

■ ■ / ■ •- - 

ACC ([SPECS) 

Accommodation coefficient of particle i 

No. 1 ISPECS. 

Card 30 : 

Particle Equatibn of State F ormat 4A6, 13, A6 

(Use only if ISPECS>0) 

Column 

Parameter 

Description | 

i-24 

ALPHA 

Particle name (any name) , 

, i 

28-33 

ITNIT 

(Independeht of 
ICON (9)) 

1 

ENG Data input in English units ^ 

MKS Use metric units 

' 1 

Card 31 

Particle Data 

(Use only if ISPECS>0) 

Format 13, 12A6 

. 

Column 

Parameter 

Description 


NPTM(I) 

Number of temperature-enthalpy data 
points for this particle. If equal to 1, 
input liquid and solid heat capacities 
(sfee Card 32). Right adjust. 

Card 32 

Particle' Enthalpy Data Format 7E 10 . 6 

(Use only if IS PECS >0; 
units specified by Card 30). 

Colunm 

Parameter 

Description 

l-lO 

TM(I) 

Melting point temperature of parficle 
No. I (°H in English units, °K in MKS 


Q 


Q 

0 


0 








Card 32 {Continued) 

Column ■■ .Parametey; v~ ^ jPeacription 

11-20; HS(l) Enthalpy^ of solid phase of particle Nq.I 

at melting point temperature (dtu/lbm 
■ ■ ; ; or cal/gm)^./ . 

21-30 HM(I) Enthalpy of liquid phase of particle No, I 

at melting point temperature (Btu/lbm 
or cal/gm) 

31-40 APHOfl, 1,1) Heat capacity of liquid phase of particle 

No. I (Btu/lbm-OR or cal/gm -°K). 

41-50 APHO(l, 2,l) Heat capacity of solid phase of particle 

No.I (Btu/ibm-®R or cal/gm -°K). 

If NPTM(I)>1 use following format. 

31-40 APHO(ljl,I) Temperature for T-H table for particle 

No.I (OR or °K). 

41-51 APHG(l, 2,I) Enthalpy for T-H table for particle No.I 

(Btu/lbm or ^al/gm) . 

51-60 APHO(2, 1,1) Second temperature in T-H table for 

particle No.I (°R or °K). 

61-70 APHO(2, 2, 1) Second enthalpy in T-H table for particle 

No.I. 

The above format (APHO(J, 1,1), APHO(J, 2,1)) is continued on successive 
cards of format 7E10.6 for J-l, 2, ...» NPTM(I). 

There are as many sets of cards 30, 31, 32 as there are different 
chemical species. 

Card 33 Input Startlkte Format 6E13.7 

(The following cards are required 
if ICON(2)=2 and ISPECS>0). 

Use Card 33a if ICON(I) < 2. Use Card 33b if ICON(l) > 2. 

Repeat this card for 1=1, 2, . . . . ICON(3) starting at point on nozzle axis. 

Card 33^ 

Column Parameter Description 

1-13 R Radial coordinate of startline point 1 

(ft or m). 

14-26 X Axial coordinate of startline point I 

(ft or m). 

This card is used when gas chemical equilibrium, frozen or ideal gas option 

is selected. 
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C a. r d 3 3 a (C ontUiued) 


Column 

Parameter 

Description 

27-39 

EM 

Mach number at point I. 

40-52 

THETA 

Flow angle at point I (deg). 

53-65 

"S 

Entropy at point I (Dtu/lbm-®R or 
cal/gm-OK). 

66-78 

OF 

Gas total enthalpy (Btu/lbm or cal/gm). 

Card 33b 



Column 

Parameter 

Description 

1-13 

R 

Radial coordinate of startline point X 
(ft or m). 

14-26 

X 

Axial coordinate of startline point I 
(ft or m). 

27-39 

EM 

Mach number at point I. 

40-52 

THETA 

Flow angle at point I (deg) . 

53-65 

T 

Temperature at point I (?R or °K) 

66-78 

P 

Pressure at point I (atm). 

Card 34 

Startline Particulate Data Format 15, 5X. 4E13.7 

(The following cards are required 
if ICON{2)=2 and ISPECS>0). 

Use Card 34a if lCON(l)< 2. 

Use Card 34b if ICON(l)> 2. 

Card 34a 



Column 

Parameter 

Description 

5 

Jl 

Particle number 

11-23 

HI 

Particle enthalpy at point I (Btu/lbm 
or cal/gm) . 

14-36 

RHOl 

Particle density at point 1 (slug/ft^ or 
kg/m^). 

37-49 

U1 

Particle axial velocity at point I (ft/sec 
or m/sec). 

60-62 

VI 

Particle radial velocity at point I (ft/sec 


or m/sec). 

This card is used when the gas chemical non -equilibrium option is selected. 
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Card 34b 



Column 

Parameter 

Description 

5 

J1 

Particle number. 

11-23 

HI 

Particle enthalpy at point I (Btu/lbm or 



cal/gm. 

14-36 

RHOl 

Particle density at point I (slug/ft^ or 



kg/m^). 

37-49 

v_ 

Particle velocity at point (I) (ft/ sec or 


P 

m/sec). 

50-62 

0 

p 

Particle flow angle at point I (deg). 


Card 34 is repeated for each discrete particle size at each point on 
the start line where particles are present, starting at the nozzle wall and 
going toward the axis (reverse order of Card 33), 

Card 35 Transonic Flow Data Format; Namelist 

(Use only if ISPEC> 0 
and ICON (2)/2) 

Although there are many parameters that may be input via the namelist 
DATA, most of these have already been assigned values in the previous 32 
input cards; and some of the parameters do not apply to the transonic calcu- 
lation. Only those namelist parameters that could have a significant effect 
on the program are included below. The namelist data begins in Column 2 
with $DATA. The last card begins in Column 2 and contains only $END. 

Parameter Assumed Value 


THID 

Throat inlti half angle (deg) 

None 

THFD 

Fairing angle (deg) 

(If THFD > THID no fairing) 

5.0 

THJD 

Angle defining farthest downstream 
i’.one in transonic region (deg) 

9.0 

THIW 

Angle where start line intersects 
nozzle wall (deg) 

12.0 

RRT 

Throat wall radius of curvature 
divided by throat radius (>2.0) 

None 
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Card 35 (Continued) 

Parameter Assumed Value 

ZAX Value o£ X where startline None 

intersects nuzzle axis, 
normalized bjr throat radius 
(I£ ZAX is not Input the pro* 
gram will calculate a value.) 

(See Fig. 3-2 for an illustration of above parameters.) 



Number of zones into which the 
upstream portion of transonic 
zone is dividedf*". 

3.0 

ZJ 

Number of zones into which the 
downstream portion of transonic 
zone is divideof*' 

2.0 


* 


See Ref 
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Fig. 3-2 - Inlet and Throat Parameters for a Gas -Particle Transonic 
Solution (see Ref, 7) 
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Table 3-6 

MAGNETIC TAPE ASSIGNMENTS FOR THE RAMP PROGRAM 


Where Required 

GASTAP - Uses TRAN7? data to set 
up equilibrium thermodynamic data 
tables or uses TRAN72 data to get 
species distribution on stirtUne if 
finite rate option is selected. 

GASTAP, IDTAPE and OUTBIN - 
Outputs input data and flowfield 
results on unit 3 for use with other 
auxiliary programs 

PARTIL — Arranges two phase tran- 
sonic solution output in the form used 
by the data acquisition rouianes. 

PARTIN — Reads startline information 
necessary to initiate a flowfield solution. 


IDMPFP and PFP — Store and retrieve 
particle data for each point in the flow 
field. 

SPCTX — Stores and retrieves chemical 
species data for each point in the flow 
field. 


Tape Jnits 
U-1108 


NTAPE^ 


NTAPE^ 


Tape Unit Function 

Gas properties data generated 
by the TRAN72 program (input 
data) 


Flowfield data generated by the 
RAMP program (output data) 


Ordered startline data generated 
internally by the two-phase tran- 
sonic solution (input data) 

V ariable tape unit number on which 
startline data calculated external to 
program is stored (input data). 

Stores particle data calculated in- 
ternally by the RAMP program at 
each point in the flow field. 

Stores ch<miical species data calcu- 
lated Internally by the RAMP pro- 
gram at each point in the flow field. 


"^Set internally to 8 if ICON(2) = 0, NSPECS >0 and not input on card 4, Set internally to 5 if lCON(2) 
= 2 (start line data read from cards) and not input on card 4. 


tlKi 1^ 


CIS CCT' 


3.2,2 Control Card Set-Up for Univac 1108 8 and Program Overlay- 

Structures 


A typical run stream set-up for the Univac 1108 Exec 8 computer is 
presented in this section. Also included are two tables which give the overlay 
structures for the two versions of the RAMP program. 


Control Card Set-Up for the Univac 1108 Exec 8 

f^VFIN 


r 


(^VFIN 


DATA DECK 

I 

{ ^XQT GO 
(^VPRT, T ~~ 


VFREEA 


VCOPIN A„ TPF$ . 
r^^EWINDA 
VUSE 10, GAS 
VASG, T 2,F 
7ASG. T 1, F 


r 




rVASG, T GAS, T, 241 5 

(^VASG.T TPF$.F///10 00 

VFREE TPF$ 

1^ VASG, T A, T, 17003 

f^^USE 13, FLOW 


Assign data tape containing 

1 thermodynamic data (if required). 

Assign sufficient computer 
storage for program. 

Assigns program tape 


7ASG, T FLOW, T, SAVE 


VRUN CONTROL CARD 


Output data tape 


NOTE: This schematic is typical of a run control scheme for the Univac 1108 
Exec 8 computer. It is presented to acquaint the user with magnetic 
tape and scratch area assignments. 

The data deck has been described in Section 3.2.1 and will be presented 
first in flow chart form and the listed for several example problems in Section 3.7. 
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.:TaMe,,3-7a; , ^ ::;V ' ^ 

BAMP OVERIiAY StRUGTURE FOR EQUILIBRIUM CHEMISTRY VERSION OF PROGRAM 



DRIVER 

ALGtNT 

PFP 

BOUND 

POFEM 

BLKDAT 

REPEAT 

DRAGMR 

RHOFBM 

EMOFV 

RITE 

errors 

TAB 

FABLE 

THERMO 

IDMPFP 

TOFEM 

miTP 

XOFV 

ITSUB 

UOFEM 

KIKOiF 

UOFV 

LAGRNG 

VOFEM 

PAGE 

xst 



PLUMIN 


ABCALC 

NEWT 

AOASTR 

ONED 

CGALC 

PARTIL 

DCALC 

PARTIN 

FCALC 

PARTPH 

FINDll 

PCALC 

GASRD 

PLMOUT 

GASTAP 

PROP 

IDMTAB 

RGVOFM 

IBMXSI 

SITER 

IDIAPB 

STHMLN 

JAMES 

TRACE 

LEGS 

TRANS 

UPIN 

WDGI 

MASCON 

WOFA 





m 






3-50 

HUNTSVILLE RESEARCH S ENOINEERINQ CENTER 




Table- 3-7b - 

RAMP OVERLAY STRlJCTUBE FOR FINITE RATE VERSION OF PR C)G|i^M 


DRIVER 

AXXHNT 

RHOFEM 1 

BOUND 

RTTE 

BLKDAT 

RWU 

DRALRtAR 

SPCTX 

EMOFV 

TAB 

ERRORS 

thbrmi 

FABLE 

THERMO 

muPFP 

TKEY 

rrsuB 

TOFEM 

KIKOFF 

TOFH 

lAGRNO 

TOF V 

PAGE 

UOFEM 

PFP 

UOFV 

POFEM 

VOFEM 

REPEAT 

XSI 


AOASTR 

GASRD 

GASTAP 

IDMTAB 

IDMXSl 

iDTAPE 

IMPUT 

INITP 


1 PHASEl 

bounda 

TTERM 

CHEGiC 

LIMITS 

CHEM 

MAXTIM 

COEFEQ 

NEWENT 

COEFF3 

PPATPT 

dotprd 

RCMOFP 

DRAGCF 

ROTBRM 

EMOFP 

SLOP 

FNEWTN 

SOKINT 

gappbi 

TEMTAB , 

INRSCT 

VEMAG 



TRANS 

ABCALC 

ONED 

CCALC 

PARTIL 

DCALC 

PCALC 

FACLC 

PROP 

FlNDli 

5TRMLN 

JAMES 

TRACE 

LEGS 

WDGI 

NEWT 



OVEREX 

FOFH 

FRANDT 

PRFRBD 

THETPM 

TOFENH 

TURN 

WEAK 

WTFLOF 


MASSCK 

THRUST 

INTEGR 










3.3 OUTPUT FORMAT 

This section describes the printed output as well as the binary tape 
output for the RAMP code. 

3.3.1 Description of Printed Output 

The program output is organized so that the initial pages contain the 
input data and the initial data surface. Each data surface thereafter is con- 
structed along a ’’normal’* to the streamlines which have been chosen to repre- 
sent the Row expansion of the nozzle and exhaust plume. The computer code 
will treat a chemical equilibrium frozen or chemical non -equilibrium 

flow expansion with or without the presence of particles; consequently typical 
printouts for each case are presented to demonstrate the output for each case. 
Numbered flags on the example printout sheets correspond to the numbered 
comments in the following description of the printout. The calculations are 
performed in either the English or metric system of units; hence units for 
both are given. 

group i- IDENTIFICATION 

(l) Computer code identification 

Qy Identifies gas -particle flow solution; does not occur for 
gaseous only case. 

® Case Number; Appears on each page — may be a maximum 
of five digits. 

@ Problem Title; Identifies particular solution, appears on 
each page and may be 120 spaces. 

GROUP 2 —program CONTROL 

These 16 parameters control the execution of program 
according to the options selected. (See Card 4 of the Input 
Guide for an explanation of the individual parameters,) 

GROUP 3 - BOUNDARY EQUATIONS (See input guide for a detailed description) 

Type Equation; Identifies the type of boundary equation 
selected. 

® ITRANS; Indicates whether a discontinuity follows this 
equation. 
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Ekiu^tvbh GoeKidtenis; Apply to upper and lower boundary 
equations. 

M AX; Maxim iinri value of x 


GROUP 4 - GAS-PARTICLE MIXTURE IDENTIFICATION 


^ Total Ebthalpy (appear 8 for gas -particle flow) t Gaa total 
enthalpy before it Is perturbed (see page 2-2), 

^ Indicates number of diacrete particles us ed to represent the 
, particle distribution. 

^ Gas Identification! Name characteristic s max .) which 
identifies the gas. If the gas data is Stored bn a magnet^ 
'v:---./ tape;4hi8-is;vthapam 

■'■-''"■•"oh 


GROUP 5 ^ GAS PROPERTIES 




Total Enthalpy (, appears for gas -particle flow) ; Gas total 
enthalpy for this table; "■■:.,■; 


O/F Ratio (appears for gaseous only solutionV! O/F for this 
table. / 


[S 

© 


Entropy; May be two maximuxn for 


or total enthalpy 


Gas Thermodynamics Data Velocity; May b e 13 maximuhi for 
each entropy (ft/aec or m/sec). 


Gas Constant; Value associated with particular velocity, etc.; 
(ftVsecV°R or mVsecV°K). 

Isentropic Exponent; Value associated with particular velocity, etc, 


Temperature; Value associated with particular velocity, etc., 

^(oR'or OK;). ^ 


13 Value associated particular velocitiry etc*. 


^ or N/m^), 


Gas T ransport Data; 

Prandtl Nuihber ; 
velocity, etc. 

Viscosity; 


* etc. 


Spe cific Heat at Constairt Pr es sure r 
for real gas with niultiple velocity vahies ^' If only One velocity 

is used the parameter printed is the ’yisb^^^ 


equation p - ^ {T/T^)^*P. 
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D 


fl 


D 


0 

Q 

Q 


0 






GROUP 6 - problem LIMIT 


(^ ^ Radial c oot dinate pL upj^p r cutp|C (uMitf cpi^ais^ent with 
, boundary' equatipns). 


Xi Aacial coordinate of upper cutoff (units consiatent with 
Boundary equations). 

(^ THETAt Angle of upper cutoff line (deg) 

(^ Radial coordinate of lower cutoff (units cbnsisteht with 
boundary equations)/ 


^ X: Axial coordinate of lower cutoff (units consiatent with 
boundary equations; 

Theta ; Angle of lower cutoff line (deg). 


GROUP 


7 — PARTICLE DESCRIPTION (does not appear for gaseous only 
solution) 

Particle Number; Number assigned to particular particle (10 max). 

Particle Radius; Radius of the particle in microns. 

3 3 

Mass Density; Particle density (Ibm/ft or )• 

Emisaivity ; Coefficient of emmisivity for particle radiation to 
the surrounding medium. 

Accommodation Coefficient ; Accommodation coefficient for 
radiation from the surrounding medium to the particle. 


/Z Wp/wg! Particle percent loading relative to the gas. 


: Individual particle percentage relative to the total 


'p' "p’ ' — 

j-I ■ mass flow rate 


3^ UNITS; Units with which the particle temperature»enthalpy 
table will be input (see the input guide). 

^ TMELT; Temperature of the particle during the phase change 
from liquid to solid (OR or 

^ HSOLID; Value of enthalpy at which the particle becomes a 
solid (ft Vs ec 2 or M Vsec^) . 

3^ HLiQUID; Value of enthalpy at which the particle begins the 
ti^ansitipn from liquid to solid phase {ft^/Bec^ or M^/sec^) 
constant specific heat analysis. 
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^ iCPMELT r Valtte of the Specific heat at constant pressure for 
^ the' ]^rtlcle In the liquid s^te (ft2/ sec 2/9R or mZ/secZ/OK). 


CPSOLID * Value of the specific heat at constant pressure for 
the particle ih the solid state (ft^/sec^/OR or ni2/8ec2/°K). 

TP; Value of the particle temperature/ (50 max.). 

HP; Value of particle enthalpy corresponding to (50 max.) 


^ fig; Particle number (20 max , )i, 

^ DRAG GQEF^ Particle drag Coefficient parameter, f^, co^re- 
sponding to v 


GROUP 8 - GAS START UNE INFORMATION 


R: Radial coordinate of the data point (units consistent vdtH " 
boundary equations). 

X; Axial coordinate of the data point (units consistent with 
boundary equations). 

M; Local value of the Mach number (must be > l.Oh 
THETA; Local flovr deflection angle (deg ). 

S^; Local value of entropy level (ft^/sec2/®R or m^/sec^/®K), 
MACH ANGLE; Local value corresponding to M (deg). 


Shock Angle; Local value of shock angle if point is a down- 
stream shock point (deg). 

H-I OTAL (gas -particle flow); Gas total enthalpy level 


(ft^/sec^ or m^/sec^)- 


Low); local value of O/F. 


GROUP 9 - PARTICLE START LINE INFORMATION (does not appear 
for gaseous only solution) 

POINT; Data point at which this particle is present. 

(0) SPECIE; Particle number for this data point. 

(5^ u_; Particle axial component of velocity (ft/sec or m/sec). 
(5^ V; Particle radial component of velocity (ft/sec or m/s ec). 


(50 9^: Particle streamline deflection angle (rad) 

h; Particle enthalpy level (ft ^/sec^ or m^/sec^) 
Q} Local particle concentration (slug/ft^ or 
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GROUP 10 *“iiE;SK CONT (see input guide) 


D LI; Point insert criteria for the nozzle-plume interibr 
solution (units consistent with boundary equations). 

DXA; Line iiiseri criteria along the axis (units consistent 
with bpuhdarjr equations )v 

DLM t Insert criteria near a particle limiting streamline 
(units consistent with the boundary equations), 

DLD: Point delete criteria (units consistent with the 
boundary equations), 

DEG PM ; Incremental angle to be used in the numerical 
integration to define the Prandtl-Meyer expansion fan (deg), 

F: Interpolation factor used in the axis point solution, 


GROUP 11 -DATA LINE FLOW PROPERTIES 


NOTE; The output format for all data surfaces are the same with each 
point type on the line being identified. Several different lines are shown 
to indicate typical line constructions. 


Line; Line number ; lines are numbered in ascending order. 

Point; Indicates point number on the line. 

Description ; Indicates point type and flow regime. These 
. options- are;--. 


; Point Type Output F ormat 


Flow Regime 


a . Input 

b. Interior 

c. Wall 


INPUT POINT a. Continuum 


INTER 

WALL 


d. Free Boundary FREEBD 

e . Prandtl*M6ye? PRN^lvIB 

f. Upstream UP-SHK 


g. Dovmstream 
- ' . ^ Shock y . 

h, Shock ' ^ 

Interactioh 


UP-SHK 

DWNSHK 


SOKINT 


SLIP 


b. Vi b rationally Frozen 

c. Rotationally Frozen 

d. Transitionally Frozen 


Output Format 

CONTIN 

VIBFRZ 

ROTFRZ 


TRNFRZ 
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NOTESt The point t/pe and How regime will appear in the appropriate com> 
binf^tion to completei/ describe the data point. 

items through refer to gas conditions. 

X; Axial coordinate of the data point (units consistent 

^) M; Local Y^ue of the Mach number 

9; Local flow deflection angle of the gas streamline (deg ) 

^2)i ' S? Local entropy- level of the gas (ft^/sec^/°R or m^/sec2/OK) 

e Vj Local ma-gnitude of the velocity (ft/sec or m/sec) 

H-TOTAL (gas-particle flow); Gas total enthalpy level 
(ft^/sec^ of m^/sec^) 

O/F (gas only flow) ; Local value of O/F 

Mach Angle ; Mach angle corresponding to the Mach number (deg) 
P; Local pressure, (lb -/in^ or N/m^y 
Qi Local density (slug/ft or kgm/m ) 

g T: Local static temperature (°R or **K) 

GAS CONST; Local value of the gas constant 
(ftVsecV°R or mVsecV°K) 

@ LOCAL GAMMA; Local value of the isei’-i.ropic exponent 

SHOCK ANGLE; Local value of the downstream shockwave 
angle (deg) 

NOTE: Items through^^ refer to the perHcle properti' ''s. This print- 
out does not appear for gas only flow. 

V; Local magnitude of particle velocity (ft/aec or m/sec) 

Local particle streamline <f«*flection angle (deg) 

§ DM; Oifference in Mach number between the gas and particle 
h^; Local particle dr m /sec-) 

Local particle concentration (slug/ft^ or kgm/m^) 

8 ^; Local particle temperature (°R or °K) 

Indicates the data point is on a particle limiting streamline 
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I 

I 

0 

0 

Q 

I 

i 

i 

1 

0 

Q 

i 

0 

S 

0 

I 

Q 

0 

Q 


GROUP 12 - INTEGRATED GAS AND PARTICLE MASS FLOW RATES 

NOTE; The units of the flow rates depend on the units of the boundary equa- 
tion. For the following units perform the indicated operation. 

Factor ' . U . 

1/144 . slug/sec 

1 slug/sec 

(Ref.length) - slug/sec or kg^/sec 

t GaS mass flow rate^^ ^ 

Pa-rtiCle total mass flow riite 

§ Sum of the gas and particle mass flow rate 

Particle percent loading relative to the gas (numerical 
integration results) 

Particle percent loading relative to mixture 

GROUP 13 
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- MOMENTUM INTEGRATION RESULTS 

This is a calculation of the component of the net thrust due 
to the gas and particle monlentum across the starting line. 

F ORC EX . FORCEY t Net axial and radial component of the 
thrust vector (lb£ or N) 

TORQZ: Net torque resulting from the thrust (ft-lb^ or m-N) 

ISP; Specific impulse corresponding to FORCEX (lb|-sec/lbj^) 

This is the incremental gas and particle contribution to the 
thrust and torque vector 

DELFXG. DELFYG; Net gaseous axial and radial component 
of the thrust vector (lb| or N) 

TORGZG; Net torque resulting from the gaseous contribution 
to the thrust vector (ft ^Ibj or m-N) ^ ^ ^ 

DELFXP, DELFYPt Particle momentum contribution to the 
thrust vector (lb£ or N) 

TORQZPt Net torque resulting from the particle contribution 
to the thrust vector (ft-lb^ or m-N) 


Units 

in. 

ft"'--^' 

M 

None 


Problem Solution Iteration Control 

ITR ; Number of iterations required for this point to 
converge mthin the convergence criteria 

GROUP 14 - PRESSURE INTEGRATION RESULTS 


This calculation is the thrust and torque resulting from the 
gas pressure acting on the nozzle wall. 

F ORCEX , F ORC EY ; Axial and radial component of the thrust 
(Ib^ or N). This thrust vector Includes the momentum and 

pressure contribution. 

TORQZ! Net torque resulting from the thrust (ft-lb^ or m-N) 

DELFX, PELF Y ; Incremental force in the axial and radial 
directions resulting from the pressure acting on the nozzle 
wall (Ib^ or N) 

ISP; Specific impulse corresponding to FORCEX (Ib^-sec/lb^) 


GROUP 15 - PERCENT CHANGE IN MASS FLOW RATE, MOMENTUM, 
ENERGY, AND ISP 


NOTE: This is a comparison of the mass flow rate, momentum, energy and 
ISP relative to the mass flow rate, momentum, energy and ISP through the 
input (startirig line) surface. The percent change should be near zero; any 
variation from zero is an indication of accumulated error in the numerical 
solution. 



Percent change in the niass flow rate of the gas 
Percent change in the mass flow rate of the particles 

Percent change in the mass flow rate of the mixture 

Percent change in the momentum of the gas 

Percent change in the momentum of the particles 

Percent change in the momentum of the mixture 

Percent change in 1^^ 

Percent change in the energy of the gas 

Percent change in the energy of the particles 

Percent change in the energy of the mixture.. 
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GROUP 16 - FREE MOLECULAR CONTROL PARAMETERS 



VIBNOt Reciprocal of the Knudsen number at which 
the vibrational energyr mode therm alljr freezes. 

ROTNP! Reciprocal of the Knudsen number at which 
the rotational energy mode thermally freezes. 


TRANNOi Reciprocal of the Knudsen number at which 
translational energy mode thermally freezes. 


CHAR Li Characteristic length used in the mean free path 
calculation used to compute the local value of the Knudsen 
number (units consistent with the boundary equations). 


GAM Vi Value of the isentrop*- .xponent to be used in the 
vibratlonally frozen flow caL. .nations , 


GAMRi Value of the isentropic exponent to be used in the 
rotationally frozen flow calculations. 


NOTE; Items 112 and 113 are the gas species data to be used in the cal- 
culation of parameters used in the Knudsen number calculation (10 max. 
may be used). 


GROUP 17 -SPECIES THERMODYNAMIC. AND REACTION DATA 


0 

0 

0 

0 

0 

0 

0 

124 ) 


These 7 parameters control the execution of the finite rate 
chemistry calculations according to the options selected. 
(See Card 5 of the Input Guide for an explanation of the 
individual parameters .) 

Prandtl number of the gas (dimensionless) 

Absolute viscosity of the gas (poise) 

Viscosity temperature exponent 
Reaction number 
Reaction )>eing considered 

A; Pre- exponential factor (cm-particle-sec) 

N; Temperatu-e exponent 
B; Activation energy (cal/mole) 

M; Temperature exponent 
R-Tvpe; Reaction type 
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K-Tvpe t Rate constant type 

Catalytic species being considered. (See Card(s) 14 for an 
explanation.) 


GROUP 18 - SPECIES MOLE FRACTIONS ON THE STARTLINE 


Point! Indicates the point number on the startline 
Corresponding species mole fractions at the point ^ 
Chamber pressure (atm) 

Chamber temperature (^K) 


13 u Species mole fractions at a point on the data surface 
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Sample Printout for Two^Phase Chemical Equilibrium Plow 
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Sample Printout for Two-Phase Chemical Equilibrium Flow 
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Sample Printout for Two -Phase Chemical Equilibrium Flow 
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Sample Printout for Two -Phase Chemical Equilibrium Flow 
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Sample Printout for Two-Phase Chemical iJ<iulUbrium Flow 


5UPERSONtc^FL^ ^^ALVStS JISlNO The tncKHFEt>-HU«)TSVI|.|.E HULTifle 

"GA£-pvsrirLc PLM~sacun^r“ 

V- . CASE HO. I : 


SHOCK epHpurcH prograIi 


'.<r Shuttle sep hotab rjozri.f 

POINT SPECtE " 

■ /.V.-, M' ■ ■ i : . 


Wmji* L-h«J 


•H«5 I 

• ^2A05>6*< 

^3iijS6 + D4 

• 33r9fi + 0^ 

• 3aS9j*0'i 

• 33i7fl9>e'* 
•42Pft740H 

R 3 B«n^«cs ^ 

•3537j^Gq 

**i30S?^P*l 

• 3R73^+0H 
>3&729»Ph 
p33?n*l+Q<* 

^ ^4373t>bM 

R3a«7''*n4“^ 

_R. 3 A 37 r, 4 n«| 

4 ilfr j V409 
_ 4^5937^09 
' s43<i2A + 0l» ^ 

0903 I 4 C4 

• 3377<i40q 

• 4 B^ 7 P 4 n*( 

• 93^3<J404 ' 

010*1940*1 

• 393''<140M ' 

. If Tf*o+n*i 

^ * I *J l** t 

t ' t T J 

- 4 * 4 *. ... 

• HI 1 /;> «i*s 
t39^ftf>40*4 
•Jifr 9*3 + n^ 


_• 7907340.^ 

• ?ifr5?l4b3 

Rl 7>7fi4Q3_ 

» 1 3391403^ 

• «0l **3+0? 

• 7642^*02 

•76377403 
_ •I9l7?4t)3_ 
“*,19925,403 

■ P997:*4j32 
•31^69402 
^3^999403 

'2971 !Vp3“” 

_^2I 770+0 3_ 

^71 6^ I +03 

• 999t>34D2 
.3b9S640Z 
•3 9^23+03 
.321714Q3 
•2 39Afi4Q3 

• 16160-^03 
• 1q9bb+P3 

• 39 I 93402 
_r93M99 »0 3 

« 3B?7^4b3 

• 757 fi 6*0 3 

' •19925 + 03'^ 

• i2C87 + 03 

• **509 1+02 

:^e9y5dn03 

*3H'^^74b3 

^7137hO+03_ 

.7r76n4b3 

^j37H **4&3 

• H7U7402 
_.5|9n*03 

• m9v^403 

• 30*^57403 _ 
•73"37+CJ 

• !'r*^9*n3 

> C I ‘1 '* M *it f 


• -r I ♦ C 3 

• r67634fl3 

• W ii 7 < r 1 

• 5?*^ i 'j ‘*<iT' 


theta 

_ ^373*a+0i 
.3lT7BiOI 
^.2‘}S43+0l 
• l^98i,.p{ 

> I 2 « 03 * 0 I 
' «S<»<fS8ipP" 
:_i.si537*Cj 
" i’3S3li*lfi 
_;.2T33<,*0t 
' *22?05*PV 
.lM26S»f>t 
>5HnSS+QS 
»S qa*)Htgi 
, »'36Sa*l *D.T ' 

» 2 *»SV 9 + 0 i ' 
f is7B«»*r,i 
'. AflP 3 a + pO 
_ . 503 C?*pt 

""•aiTitihi ■ 

_*3jiie7*oV 
• 2 A 973 ini 
• IT3fc7*fi1 
.t7n2ij.on 
*SM‘?9A*n;_ 
•BAABB+Cr 
_. 3 A? 9 a*Rt 

• ? 93 B 0 .pj “ 
*r9P22.01 
.Tj‘lc7*0p 
•S97«2*nt 

’'isnTisioi ■ 

• 1 ?S 5 A*P 1 

';3i92l+'fii™ 

« 2 n‘>S 9*01 

*RpPi i«np 
.* 9835*01 
'.S<i 96 B* 0 , ■ 
.HJ962+P! 
« 3 *tAH!l* 0 i 
_.7?5e7+n, 

J ^ O ii-T •fjf; 

> < ^ » A . »• t 

• 4 1 + 4 .'. It. I 

• Mi l 

. 3 fl 77 *i*Ci " 
_.?533^-0t 

• 9701 3-nr> 


*S0G2R*08 
.5li0£*0R ' 
5 i 5G5*0« 
:»S2nTS+OB~ 
V526SUQR 
~~Ti&iJA7*0S^ 
;505G9*08 
~,;SiOSi*n8~ 
_ >51558*08; 
Ti:5|968♦0«^" 
«S2*V*»9.08 
*53l^9*08~‘ 
_,»57iSbs*oR': ':• 
^i50983*0d^~ 
J«>5isi?e*oK; 

•.73>P8’:"" 
•V^23T3»Q8 
■ .. >52'9ZH*0«-.- 
*5o*<3iDi*pei 
,50»ai<o& “ 
.513S5+08/ 

‘ Vs 1 73 1 ♦Pfl*- 
.52 1A6*0RV 
“.S2A£j*ftR " 
_ .So355*Sa 
". 5Ofl0940fl - 

• 5 l 253 * 0 tl 

.51950*08 

•~T52»» 3l*Bd 

.50250*08;: 

"“;5o59S*OB^ 

.£1109*08 

~;si9oi*oir— 

•S|75o*o8 

“.57310*08 

^.soHh^ob 

• 5n577*08'' 
*50963*08 

-.5i2H9*PB ■' 
.51 55 1 *08 
. C 7 9 1 ft * 

,‘l•' ‘ f 
t ;.•,'•<« I . tiH 
.5(1 ,8* .fill 

.5|t26*0a ’ 
_*5 1 782*08 
~ ■ s' 3 2 3t3.?^R 


•R02rS-09 
;9iG«iii7qa8 
. *IO»»S5r03 

“ %i2Z8ftoD3. 

• ISTsSVfj's, 
;V02U/*0H 
.9D030«O9 

^T,yi235-.a8 

• 1o8'I*I:«03 

■'ll 2255-03 
. >lH78f-03 

.9o?4*j.cnr* 
*3ot8G-09 
■"": 190882-09 r 
.10*211-03; 
V ■^Vi22ft2*03.* 
.18892-03 
~-7^tg 81-ll+ ~ 
>4.9525-09 
~79ti9a9-05I- 

• i0fiib5-03 

. .,*:l22«8-03V 
» 19825-03 
■“ . 9a£iS5=Tl9- 
»392is.:3-09 - 
■“■590133-09", 
•Jh2»6-03 
~*123I9-'«3 
*1 5028-03 
T8ioffr-D<r^ 
13898/-09 
~«89772-D9“ 
•10786-03 
”112359-03- 
*15138-03 
■“T9¥9B3«0V* 

• 3.6A87-09 
•8V367-04 
V 10776-03 

■^•12399-03' 

*15735-03 

~'*:9C789-n'» ' 

*liilV 7 :.ii^ 

*««»-*''.-09 - 

• t071h-P3 

*12905-03 
.15259-03 , 
~TV590B-Trr^ 


vGroup 9 
rlCont’dl 


3-71 
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CS=3: 1=3^ C=3 Cn CZ3 OZD C=3 CZD CZ3 ■ C3' CT3 QZ3 ^ C^i 'Q 


Sample Printout for Two -Phase Chemical Equilibrium Flow 


supersonic flo« analtsis using The locpheed.huntsville NUtTiPtr shock computer 

G*S-PlRTlfLE Ftow SnLUTloW ' 

___ no, j 


progrAh 


PAliE 15 


\Ep f-^TOF? M 0 Z 7 L** 
POINT SPFcTf 


• ^ M A+Oh 

• ^|»|74 0 h_ 

• 37 D 7 . 140 H 
mHH?Srn*DH 

• 397 S 3 *n«| 
* 37 I 7 «;*Cm 
•Ha 733 ^Ch 

-**nP 7 ci 4 n^ 

• ‘l 7 r 09 *C»H 

| 4{3Tt " 

,«i 7 4 TT^C 

• MJ? 3 *> 40 h 

• S 777 


_^1 ** 0^433 

■ ** 9 ^Afl 403 
_-36A97+D3 

• 2 S 1534 d 3 '^ 
•I7199403 
*A 973 e 403 

• 5 ilP 39403 
"“•3ei93*0J~ 

579^:7^403 

IflCM 3 * 03 "” 
5 7 o S * 0 3 
"T *?^6 96 ^ 5 ir ^5 

.92377403 
73272B403 — 
•75A3|403 
“•"6ir,97 + C3 
» 9 5 AOf »ri 3 
.A339A*03 
^A7AC1 403 
*90'^694d3 


thTTa 

» 7 c; 6 b 1 401 

• Ah 1 Off^T 

• 50<«37401 

'innAHAtor 

• ?A'^Al 40 l 
“*78fl5940| 

•AAP 02401 

■*<;265840I 

*HZ 97 t 40 l 

•? 77 HI*cI 

.8^^90401 

“ 7 ?ftfT^rn 

«57AB|4t3l 

1IHAA9H4nr 
•9| 39850J 
; 77 ^ 09 40 !“ 

• A 1 ASS *h t 

'T^Tsa+trr 

• Bh 99740 I 
■;t 0739407' 


THT Mt^R^ CON^TTlufTlbN fT^^O^fTROl EH By^TBr”TTJLLOW|*jr. >T>l 7 T^i?y. 

0^ AXfS* .300^01 DL L1W» .I&O +06 OL dFLETC* .100-07 


•H 99064 QS 
"^033240H“ 
•S 0739408 
^• 5113 Z 40 F“ 
•si 9984 ne 
"; 9 V 8 iA 40 B 
eSOZ7040B 
""•50715408- 
.51165408 
”.52322408“ 
•H9ABS406 
“TSOTAUrrrr- 
•557A9^oe 
•51507408 
.99579406 
fSot 10408^ 
. .50938408 

.50*20408 
9 93 20406^ 

F 5 — 

DCG F.K«> 


.37957-08 
~^BB 2 r 8-08 “ 
.HW^? 9 - 03 . 
~r 23 HS-Oj 
.15217-03 ' 
~ i;7UV-09 
.87757-08 
^• 10520-03 - 
*'|238S-03 
“i 15135-03 
• 37069-09 
“TaA 9 72 -ir 8 ^ 
. 10953-03 
’ .1217*1-03 
.35507-08 
•B 5 t 89 - 08 ^^ 
. 10272-03 
■' 73 S 8 S 5 -fi 1 T 9 r- 
. 82500*08 
%^87aA-08 


Grou p 9 

(Cont’d) 


»ADO*OI F« »fc 5 P»QP I Group ID 
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Sample Printout for TwO'^Pbase Chemical Equilibrium Flow 


SU^cRSOMIC FLOi ANiLTSIS US|Ws t«f L«CRHEtfr^HUttfSVltt,C HUlTirt* SHflcR COMPUTER ^ROCrIm I 


C ASB^ARTIELf fUw ^oLUTIAM 

Case MO:; 1 






RACE 21 j 

MPE pfcSV OsWtP • RCCINE s(^ 

li© T«,T.0 

ERTRDPT^S^ 

VEtOCIttVJJ) M*TOTaL ITR 1 

~**ACM 

RARTICIf 

WSs»Ht 

LOLRV-0«IMg^HO« AWRte^ - H 

SPtcif ^alhl OCSCltlPT]q»» — v Iga 

VHm ^ ir«r^ Er 


iasmr^^^™* — -lTERp|*Ato«e 

i 2^ IMPUT - COMTIM 

_ .jTASP^nr 

"TTmrrBU ;UAAA*0l ;«MS5A«Q3 

«R|1S*>«03 «ARS2S-Cr •RISrMOA 

»y7R9TA02 

• itsswos 

.l20?]«0t - 

PARTicif pATA 

1 T4 LIUTT SmCAHLlNC .^a«7^2>b« 

»10T3r 407 •t3rOR*00 4^*320*00 • 

3R2SA-OR *RSlTS«OR 




I INPUT * CnNTlH vl^WT^OD 

« 5IARJ540I Z •iHVT3«Ql 

«>T|3A4ST -ASTas^o? .R3 |RA*qm 

«X«iSR«OS 

— ASStoSfqir^' ■MT7SJ»e> B 

•1210l«Ol 

i';iNTTrir hata 

NO PANYrrm MPC PRE^CnT at THiS.POtRT 


. 




1 iT«i inruf. — ^ 

^3A0'«t402 

• 37I52A09 «A?RR2*02 ’^IwSMoJ 

•|t0sS*D^ 

•1210*^01 

MO PANT Tf ITS ARC PAFSEMT AT THT5 POtNT 




CAS PLOW r*tf b ^Asris^cr p/'RTjclc pass rtOR rate • 

MftTuRE MASS FLOW RATE m #RtRS4*02 

(S3 

^AATiCtt PtHLthT L5AU|NC^ ' 

RADIOS ’ LOAOrWC 


(25 


nrOOO-Oi ■ ,R<r*«R?Of 




- * U -. . 

** •fwo5*<H’^ -foanow - 



#71009401 ^TOQOOTiFI 


■» 

■ 

•J200Q4(<i ;2U6AUCi 



1 

• R»boo»OA •lAliAi^er ' 




•*SD0D4d] 



rABTICLET PCNCEMT L0AD|NK NCtjTMVE TD ^«E WAS - *37'^^4VI^^PAKT1CLt jP£NCIilll LDAWI*!* HA&iAll«A 



RONENTUH-IKTAlRAriOR KT^tJUT^ 

pdrcta forcet tnR« 

tSP 

-1 ' 

. - _ MLrir 

•CQOOO •tfoood 

OfUPTS TORBtik - DELFiR 

no^Tsifin 

oelptp 


•)47TR*0S 

SOOtIO 4DDOOD •*00^7407 

,110000 

rtWOB'5- w; 


Group 11 


> Group 12 


J 


Group 13 


NOTES; (1) Typical printout for the atartline data surlace, 

f2) Some points have been omitted lor demonstration purposes. 




rrn - r~n r — i 


■ ■ n 1^ Ui ^li ill I I 1 1 ji ti* iiimJ * ■ . ^ i I ^ I ^ 


•ej? 




.1, 






~ i 1 ^ 1 1 1 1 V h i ^ in i • ■ Cii.t t£r ^ ^ 


lOCKHECP* HUNTSVILLE RESEARCH A ENQtNEERiNQ CENTER 


r—! I — 


CZ2 


C 


cm:' 03 c -3 


fasnETlHlW » aj 


Sample Printoot for Two-Phase Chemical Equilibrium Flow 


suPe«soNie no* avaltsis ustir« The tocXHtco^HUNTsviLte hultiplc shoc« compute* progr4h 



cASi^piirTTL-E-fpnr^BCPTrffw 

Case no* f 


P4*f Z7 


-1 

] 

^^XCE SttUTTLC Se^ HOTOS 




- ^ . j 

■t 




ttnc POf^T 0SC*1* * BfBIHE * 

X 

M 

TneTA ChTROPT 

VELOCITY 

h.total 

ith 


^liCM AtfSLC 

“pRfssitWc 

OCHS ITT ^ 

^XHPCPATmiE fiAST^WTl^ LUCAtT^AHHA 

'SMOCM AMBLE 



PAPTtcLr qsT* 





-> - * 




specie POtilT OtSCRtPTlOM V 

^hetI 

0 H 

eRThIGH ' ' 

DCN5TTT 

^ HEMrtHATUHt 

2 73 tHTC« - courre •l7*S3<»0a 

•HOAO^IO 

« <4^01*01 

•13477^07 «A7474*0Z 

•S3243«a9 

■••19725*0* 

4 


^ •Jr3aa»Q<i 

PS*1lCl.e OATS 

•-»0Z7^*03 

TITJ3?=o5 


iTZoT4*iJt ' 




J T3 .ASIISJ^OS 

; 73 LIMIT STRCAMLtHC •A6ATn«o^ 

•tQTZ2*0T 

*TZ3No*Ol 

*iZMZO*ea *9To7D«oM 

•Iot03*o0 ,9*7Vi*om 

"JJS4V9-69”™ 

«7SSI&*D9 

— %99fl*0»OT 
•95724*09 






. 





■"'J fn IMTCM - CONTlti •l35iSA6o‘"“”“ 

•ISSTS^Ol 

“•TlTiT9(re 

•3t4tP«03 

TiTTfiGol 

«*n733*0I 

" |•l4IAT*oi •4/4iOADT 

*9304 lAQR *|T497409 

- • *a9Ul 9*U9 
*mo9^oi 

■ *l|9T3U«Ut — 



PAMTICLC OATS 

1 ZS LIMIT STpesHLtNr .*M*»MB*0* 

*tlST|«Ol 


•31594*09 

*99709*09 




* IS ihtc# - coMTiH *rraT*o(j 

•1«T2Z«a2 

« 1 1 717*00 

«3A3TT«Q3 

«i/i2o*ei i 
**lMSS-02 

; *IA0ai*03 *AAAJi*IJr 

*HH*S«*UP 

•IZ|1T*6| 




particle SATA 

HO PART1CIF9 AtE PRFSEhT AT THIS PqIHT 



. 





' 


...... 






f ZA MALL ^ COHIIM ™ 

.34*TI»02 

** IStSa^QD 

•3TH9T*Q3 

■*l‘7AA7*bl 

•SflTT'^OI 

' *1 7JA9*0S wATT74t|fj| 

■*.9z3|2«09 *|T49D^09 

•12130*01 




PAHTrrtr n*TA 

UO PARTIClCS A*e PlirStHT at this point 













. 



PoPCCf 

ropccr 

THTTWITTW 

TOHOr 

■wnoTR 

nCIPA DCLFY 

ISP 




^ *■ 1 aTii*o^ 

*00^ 

*00006 

••losTs^oT'’"' ^^troodo 

• wAT:.. 





PCHCCNT EMAMCE tH HAST* HOHCHTUP 1*0 e«e**T wOWft»j>jeiL IHTg<**T|aM rn* LtHC j^EtlTlYE ST*iT LIHC 


■ PEPCEHT^CH»eCt‘lN"Pl*ST‘ rLTOt" W 
<'r«CENT CHAHGC tH HOHCHTUM, 6A«* (10 1 

CrfTHGE IH XHCH«Ti S«5 


;RATiaM ro* Lt*c Mclitive ^ 

-•TWT»OI _ I 

i>*OB&02ri"Tupie •^.t?30J*or4* • / 

• — jwTTw^^HUTuwt w t*.>janR*oa J 


^ Group 14 

Group 15 


NOTES: (1) Typical printout for a data surface inside the nozzle. 

(2) Some points have been omitted for demonstration purposes 






Sample Pruitout for Two -Phase Chemical Equilibritim Flow 

SuPggSOMte FLO* >»rftLTSlS ilSlN^ The VOCKKEER^HUNTS^^ILCE MUutl^LE <0HPUYCR Mofitin 


OSE N0» t, 

s**iee SHUTTLE SEP HOTOa Httgrtc * 

Ltwc -itNi osc«»l^ - RECiNc ft r . n ' 

A«<;Le P««£55UMC “ DrH5| T V ~~r“ 

p*»Tiri r QJtT^ 

"SPCCTE PdlliT OESC*JpT*0w T H£f£ B“ 

n: HY " ^sn-hA - doHTJH *rwvrrfm nr?5 <i>»oi 

■ IY&»2«02 •39eiO«f11 

piaticlf OATA ' ^ 

«0_PA»Tln ARE PSE^gflT AT -THIS PpINT 


Th£Ta EldTSopt velocity H-TOTAL I 1« 

PgSATfRC "”6 aS C0MST» L O CAL ' aA t e tr — shoc« an«l^ . . - 


P^NSITT >' 


.-JTEUPflWTUSr - 


I7603<C)V «if7TB*dl 


AD PRN-Hfr - rsTSTT+DB p^nsTfinr 

«}2V9S«Qj 

PA»T!CUr DATA ^ 

NO PA«iHcLE5 ARE PRCSEMT AT THIS PoiNT ' 


165*5*041. «tVAl)*Q4 «t2V|]7*ai 


„ _ *U>DB»02 

PASTIfLf 1>*TA 

«0_P*»mn F5 APE PWCSEMT AT THIS PpTUT 


l3J51*nV *19-1 l*OV *n03l*01 


_ ♦10209*02 *»637a5*it O 

PaRTICLK. pat a - 

NO PAvyrcLEg ARE present at this POIMT 


11223*09 «l9«n*a9 «IJ|S7*0I 


*1 h 7 prn-hA - COmtIn * 3 i 51T4 {!q" 

. »9i I3n»ni 

PART1C1.C DATA 

VO ^A Rt I CECS ARE PRESENT AT THIS Pfltwf 


920^2*07 «|9A1J*Q9 *13292*01 


*0 9fl PRN-HR - CoNTIN ,3 | 517*00“ 

.. ♦AQDS5*gt 

PARftrLr DATA 

HO , Pf>R T I c ixn ARC pwrarNT at this pqIht 


72700*03 « I to 11*09 *13912*01 


. ^.69031 *01 

PlNTtCLf DATA ^ — — 

»fO PARflClfy ARC PRfSCwT AT THIS PqJHT 


55|«il*tn *I9A|-.V9 *13527*01 


NOTES: (1) Typical printout for a data surface containing a Prandtl-Meyer Expanalt^n. 
(2) Some points have been omitted for demonstration purposes. 


mm is^ cn czr; 


LOCKHEED ^HUNTSVILU RESEARCH A ENQINEERIHO CENTER 


X 


ime^ 


CZ 3 . CZ 3 CS 3 GSSi C 3 


pa ^tc * » g^ssmataa^ ! > « <» ■ » > « <.% 

iaeeJ!®*^ 1 ?e3Rs^ hsassK:s isEsisiiwsj Vs?3ej^j» W«*W 


Sample Printout for Two -Phase Chemical Equilibrium Flow 


5UFER50RIC f low *N* LTStS USfRfi TH E LOCftHCC0*HUMTSVtLLC MULTIPLE SHOCK COHpUTCt PROIRIh 
gHURftRTlfLf rLO'i lOlJirniH 


SNUTTLg SEM nOTOR MftZZtE 

Ll«c OfttNr OScMtP « PECIHE » 

KictTS 

P^PTlrLC fl*T* 

“speck point OCSCRIPTIQn 


t MLL * CONTIN 


PAPTIcti: OUTA 

> > 

9 '""1 

1 I 

“■■' '* 1 

*• 1 

* 


*Od9no 

*lflOCT*Pg 

;TT^ AT5»0R 

•7R^tCO*OR 

,717 SSc-»0^ 

*i75Tn^o^” 


*«»04O*or 


■O on OQ 
« 00000 
•DOOOo 
•6onao 
^Oo nOO . 

•ooifQS 


#BB7S5 -tH 

•107*A+o6^ 

•ISN76^00 

•3N7lS*00 


«3T34]^0S 

V 


||< ^ r r FNCEOD * CQNTtH »lDt70*0l 

~ *4T01T*0t 

PtKTTrtF ft*T* 

NO P*HT!CLES“*HC MESCMT AT TKtS PotwT 


•T507S*00 
• 3Mn7«0| 


*S31«N«Q| 

•ilNN7«oi 


*490pO«07 


•tgatc^Ot 

tOloTf-oS 

~ jw ffr-cs 

*Na70*-Q& 

•i^oR«-oS 

"TRsrrr^cs : 


4 HEN STffEUHLIHE H4S mE£H THSERTEq OW LINE 117 ■CTOEEN POINTS 75 IND 74 


H»TOTik. Ita 


P4P T1 rtr D4T4 

~ ^ 1 

3 I 

*♦ I 

•i I 


>00000 

« 17074402 

,7»47l»«l*0^ 

*7»0lU*0N 

,J77|7^40N 

,747fl>l?»0N 

>720904*04 

«*744TN»Qi 


«• UfNN*Ot 
~*>707**02“ 


» 324NM»QI 
•NO 174*03 


•00000 
« 2^^51*07 


^»4NRr=?iT" 
•nggs too 
• l4«tnit00 

•22nB7*00 


nmTT*ij2 

•22V0340S 


•27424^04 
”?2»«7*0R“ 
•Jl27S«04 
■l a N /o tP O N- 
•R104f40N 
-sni ■•5*0R-^ 


•aioN5«oN «*i9*«»a*oo 


-f^NTTPIIT- 

•2010S4DS 


•NtftaS«04 


II ▼ 7i 7RCCBD ■* CONTTN *10*47 *ITr 

*47037*01 

>4MTtrLr Slri ^ ” 

N0_P*llT»C»E7 4ME present 4t TMfS PQlH? 


•13S2T40t 


1 NCN ^TNr4MCTHr‘l 


NOTES; (!) Typical printout for a data surface in the exhaust plume. 

(2) Some points have been omitted for demonstration purposes. 




Sample Printout for Single -Phase Chemical Equilibrium 
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Sample Printout for Single-Phase Chemical Equilibrium Flow With Free Molecular ConsideratiqiiB 

SUPCBSONIC FLflW ANALYSIS USImG THE LOCKHEErf-HUNTsVILLE "ULTIPtE SHCCK Co»PUTER PBp6Rj(H 


rASE NO. 1 pace I 

SASeoUS CHeCK case: tree NOCECUtAft calculations COfiSlOEREO 

\ . RUN CONTpciL PAKawCTERS 

' ‘ iCONfJl ICONI2) ZCON(^) ICOWIBJ ICON|6) 1C0N(7I 

' I 2 21 2 1 0 .1 V 2 

iCONr^l ICONIIO) ICONtit) lCt>NClZJ ICONII^) ICON(|*|) XCCNnS) ICONfJ^r 

0 99 I i 1 0 — 0 ; 100 - 

ELOR calculations AR : IN ENGLISn units with The R.X COORDINATitS in feet 

The rtOR FlELt} OiTA TILL N0T *1 AR|TTeN ON TAP^ * ’ 


IJJ - 

1 

TYPE 

2 

3 

rlRAUS 

1 

0 

A 

. .00000 
•20000+02 

n 

•OOoGO 
• OOnOO 

UPPER SOUNOARY 
C 

•ocooo 

•0C030 

D 

*2679S+00 

•00000 

■■ ■£ 

.IA?A»*00 

•qooso 

HAS 

*3q?C9>(JI 
• loot-f + o** 


<1 

TYPE 

2 

ITRANS 

t) 

A 

•30000 

A 

• OOnOO 

lov;lr bounoart 

■ - c 

•occoo 

D 

•coooo 

- E - . 

•OQOfiO 

>A? 





THERE ARE * 

0 PARTlCLe 

SPECIES PRESENT In 

the GAS-PARTIClE 

HIXTURE 






tke following gas 

PROPpRTlES 

IN ENGLISH Units 

ARE for ideal SaS 





real Ga5 !»R0PErT1ES 

0/p 

• oooon 



s 

«ooono 


V R 

•onono # 200 IA^oR 

•3^Si6*0H *i?925+0H 

• 557 <* 6+09 • t 9 S<I 0 * 0 ^ 

*AHR 1 S*C'* •i 9 q 2 Qf 04 

• 71902 + 0** *1 98 I 3 + 0** 

m 77 ^*Q^*QH .V 9 Ai 1 +OR 

• S3S77 + 0** • t?fl! 1+09 

• ti95'f3 + 09 • I 981 1+09 

•91968+OH *1901 1+09 


GA9HA T 

elT 790 + 0 l * 59689+09 

• U911+01 *«i0256^09 

•17121+01 *923^0+09 

•17229+01 •379/64Q9 

• 1 7297 + 01 •32999 + 09 

• 1 2399 + 01 *78962+09 

• 1237A+01 •7930C+09 

•17731+01 •19319+09 

•174I7+01 •17290*09 


P - PR 

• SOCOO+39 - *00000 
•10! B7+09 *00000 

• 35999 +Oi *00000 

•18000+03 tOOOGO 
*90000+02 *00000 

*95001+02 *00000 

*18000+02 *00000 ~ 
, 60009*01 *00000 

.3600h+Gl *00000 


VIS 

CP 

• CG0C3 

•OOOCU 

*co:cj 

mOOOtO 

• 3CC30 

« 0 C « G C 

« DCCvU 

• OOCiiO 

• G C C- C 

• rjoDCo 

• GODCD 

.uloou 


• OLOOlJ 

•ocroG 

• C'OIJOO 

• cue 30 

• 0\V3tJU 
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Sample Printout for Single -Phase Chemical Equilibrium Flow With Free Molecular Ccasiderationa 

supersonic flow ANALtStS USImG THC LOCCHCED-HUNTcVILLC multiple shock computer program 

CASE NO. 1 Page 


GASEOUS CHECK CASE W^Th FREE MOLECULAR CALCULATIONS CONStOERED 

REAL Gas properties 

H^TOTAL 


S 

aOOOOO 


• 93361 > 0 '^ »| 99 l l* 0 -* 


GAMMA 




Pf? 

kODOQO 


Vis 

fOOCOG 


cr 

tOnOOO 


00 



9 

H 

theta 

s 

MACH ANGLE 

SHOCK ANGLE 

0/F 

•DQDOO 

•32324+01 

•42555+01 

•00000 

•OOnOO 

, 13591 + 0;! 

•00000 • 

•ooooo 

•51977-01 

' #32320+01 

•42541+01 

•82494400 

• GOfiOO 

. 13595*02 

' #00000 

•OOQOO 

• 1 039 A + QO 

•32309+01 

•4Z533+nl 

• U503 + 01 

•OUJOO 

* 13590*02 

•00000 

•ooooo 

• 1 5S90 + D0 

#32290401 

.425244^1 

• 2472*401 

•CUOOO * 

. 136.0 1+U2 

•ooeoo 

.00000 

* 20777400 

• 322A44Q1 

.42513+nt 

.32907401 

-CU.'lOO 

. 13605*02 

•uouoo 

•ocuoo 

*25955400 

#32230401 

#42H.9a4nl 

• 4l q 3 l4CjV 

•caooo 

. 13609*02 

• DOQCO 

« oouoo 

•31 122400 

• 32 1 90 + 0 1 

#424794nl 

.49070+U* 

-OU.iOO 

*13616*02 

• oouno 

r UOQOO 

• 3A2'> 1 4Q0 

• 32 l*^240t 

.42454401 

•5*99440: 

•cuooo 

*13629*02 

•ooooo 

•UQOOO 

•H 1401 400 

•3?0R7+nl 

•42420+01 

• *477*0 + 01 

.cuono 

* 13635*02 

•oacoo 

•OUCUO 

• 465rS40r3 

•32U?fc+ni 

.4237*401 

. 72345+01 

•coooo - 

, 136M9*02 

- #00000 

•ooooo 

•51577400 

•319^6401 

.H23l74nl 

• 79*4& + 0i 

♦cooco 

.13669*02 

•ooooo 

•oo&co 

• 5A60ti4fj0 

• 3 t 8H5+01 

#42239401 

• a*5fl*+01 

*CDOOO 

• 13693*02 

•UOUOO 

• uouoo 

• 6 1 5u74u0 

• 3 l8ni^4TH 

• 42 t 4 1 4ft j 

.93123+01 

•cuooo 

. 13727*02 

•ooooo 

•ooooo 

•665C8400 

•31 723401 

•H2U3l4ni 

.99397+01 

•cooou - 

. 1376*^ + 02 

•oueoo 

•uoooo 

-71372400 

•31635+01 

.H193l4nl 

■ 1 0^7* + U? 

• ctiano 

.13797*02 

•ooooo 

•COOOQ 

•7^159400 

•31542401 

•4ie5B4fti 

• n?5i+u? 

•coooo - 

. 13622*02 

•ooooo ' 

- •UCiiOU 

•00975400 

•31443+01 

•4l8l24n| 

• l 19*7+07 

•cuooo 

. 1 3H37+02 

•UUUOC 

•UODUU 

•B57M24U0 

•31339+oJ 

.41785+nl 

• 1 27 tn + Q2 

.CUi'OO 

t 1 3BS6*02 

. ooooo 

•UOCOU 

•90479400 

• 3 1 228401 

•4l770+nl 

• 1 3*i*7 + 02 

*C 0:300 

. lJi)51*C2 

•COvCO 

•ooooo 

• VS24A4|)0 

•31111+01 

♦ 4 l7A34nl 

• 1 4 732 + 02 

•coooo 

.13659*02 

•COuDO 

•ooooo 

•lOOCO+Ol 

•3n9ft7+Ql 

.41757401 

•isnCo +02 

•COUOO 

• 13u56*02 

•UQuOO 

•OOOUC 


• inflco«o 3 


x» 


UPPER, ROUNOaRY 

mXWO-^03 THETA 

V ibno ROTNO (^0^ 

• inaoo<^ci 3 * 50000+0 ? 


RUN cUTOFP 1N«^CKhaT10N 
-oonOQ 


(lO^ tranno C 

3?^ ,zonoo4.oV^ *i 


OOOQO 

CHARU (llu 
0000 + ^-^ 


LOWER BOUNDARY 
X» .zoooo+oa ThETAi 


GAHV (Tl^ (n^ 6AMH 


t 90000*02 
* 


#00000 — / ^"'-<00000 


^ Group 16 


The mesh construction will be C9NTR0LE0,BV the following variables 
DL INTERIOR* *300*01 ox AXIS* .100*01 nL LIH* *100*01 DL DELETE* •S00*02 DEG P*H.< 


*SOO*Ol F* .500*00 


NOTE; Free mo lecular flow calculations can also be included in the gas-particle flow. 
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Sample Printout for Single-Phase Chemical Equilibrium Flow With Free Molecular Considerations 


S'JPCRSOMIC FLOW analysis USInS THE LncKHeED-HUNT<V I LLE HULTJPLE ShOcJC cOMPUTeR PROORaH 

CASE NO. I pace e 



gaseous check case NITh 

fkee molecular 

calculations 

CONSlOESEO 




(7^ 


1 11^£ 

point 

OSCRIP 

•* 

R!i6i«e 

R 

X 

R 

Theta 

ENTROPY 

VCLOCITT 

0/- 

IT« 






hacu angle 

PRESSURE 

DENSITY 

temperature 

6AS CONST. 

LOCAL GANMa 

SHOCK angle 


1 

X'i 

iHPtiT 

• 

Cf)NT]N 


•31T23*01 

•92031*01 

,99397*01 

.00000 

•90999+09 

•QOOOO 

0 






*1'«7G<I«02 

»969S0*01 

* 18630*03 

. |83ia*09 

•19811*09 

•12775.01 



i 

IS 

INPUT 


CONTIN 

m7\37?^ryo 

.31 A3S*01 

•91931*01 

.10576*02 

•00D30 


•OCOCO 

0 






.13797*02 

.*177374^01 

* tfln7*--03 

• 1830H«OR 

• 1981 1*09 

.12772+01 



i 

16 

Input 


C>>NT1N 

*7At894>00 

• 3 1 1;<(2*01 

#m fi5f*+os 

*11251+02 

•UOOOO 

*90309 + 0*! 

•OCDOO 

0 






.13822*02 

.98327*01 

•19057-33 

.18933*04 

•1981 1*09 

•12770+01 

* 


* 

IT 

INPUT 


CriNTlN 

• 8(i97&^00 

«31uH34>01 

.Mlfl3+01 

*11967*02 

•UQOOU 

•90360+0H 

• occ:< j 

D 






.13837*02 

•98701*0 1 

• 19172-03 

,18963 .09 

.19011*09 

•12766*01 



< l 

Ifl 

Input 


C-JNTIM 

a857M24.?)0 

•31339+01 

•sjTO^+Dl 

.12710*02 

•UOOOO 

.90393+09 

tOQCOJ ' 

n 






♦ 1 

•98917*01 

*19239-03 

.18981*09 

•19611*09 

.12766+31 



LO 





• * 

' 







. * 


1 1 

49 

INPUT 


CONTIN 

.90999*00 

• 3l72fl'^Ol 

•Ri77C+0l 

.13967*02 

•oocoo 

.90339+09 

♦acGou 

0 

O 





• .t38Sl*02 

•^9n3a+0I 

• «19274-03 

~ .18991*09 

• 196n+0R 

•12767+01 



1 

20 

Input 


C<)NTIN - 

.9G2SA*00 


-- *9l76:*01 

- ,19232*02 

- *00000 

.90329+-C9 

•orsac 

0 






.|38s9*02 

• <i9f nn+01 

• l92?S-03 

• .18996*09 

• i?eii+Q*+ 

» 12767*C; 



I 

21 

INPUT 


C')NTIN 

.10000*01 

«309S9«0l 

•9{/S7*0l 

•15000*02 

•00000 

•90325*09 

•OOCDO 

0 






.I3RSA*02 

•H9l99^0l 

• 19309-03 

... , 18999*09 

- *i?dn+0R 

.12767*01 



1 

22 

PNN-mR 


CONTIN 

.10000*01 

• 30«R?<*^0L 

•95091*01 

. .19669*02 

•00000 

•92165*09 

•OCODO 

0 






.12812*02 

•2S77e*0l 

• 1259<-33 

.16398*09 

• 1984 l+o^t 

* 12865*01 



I 

23 

P«N-hR 


CONTIN 

.10000*01 

f 3a9S?+at 

.99119*01 

,29750*02 

•DOOOO 

•93688.09 

•oocco 

0 






.117<I7*02 

«lb7444>(3l 

.77372-09 

,19297*09 

• 498U+OH 

.12999.01 

. 


1 

2H 

PRN*hR 


CONTIN 

.10000*01 

•30989+01 

. •53332*01 

.29629*02 

- • 00000 

... .95999+09 

«ooco? 

□ 






•1OB07902 

•8S^43*00 

•99831-09 

. 12502*09 

•49611+0^ 

•12999+01 



J 

2S 

PRn»hR 

m 

CONTIN 

•tnoon*Ol 

•30909+01 

.5R19E+01 

,39999*02 

•OOOOO 

.9AV99+09 

•COCCO 

0 






•9902a*01 

•98765+00 

•30^81-09 

,10899*09 

• I96U+0R 

.12799+01 



1 

24 

P«N-kR 

m 

CONTIN 

.10000*01 

•3Q9d?+nt 

•63717*01 

,39379+02 

•DOOOO 

.98375+09 

•oouoo 

a 






.90295*0 1 

•23T97+00 

•18139-04 

,92955*03 

•19844+0^ 

.12999*01 




NOTES: (1) Typical printout for a startline data surface containing a Prandtl -Meyer Expansion. 
(2) Some points have been omitted for demonstration purposes. 
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Sample Printout for Single-Phase Chemical Equilibrium Flow With Free Molecular 

SVPCKSONic TlOW ANALtSiS USiNfi THE UOCKKEEO-HUNT^V ILLE «yLTiPtt S^OciC COMPUTER 


TASE NO# 1 

GA$E0US CKECIC CISE rtlTn rntt HOUECULAR calculations CONSrOCREO 


Consideratioas 

PROGRAM 

PACE iz 


PERCtM7 chance tW HA^S» hOHENTUM ANf> ENERGY NUH£f?U:AL INTEGRATION FOR LINE 2 RELATIVE 

tke Percent change !N mass flop is ■ ' 

PERCENT ChANg£ If' MOMENTUM rS • .ISaRO^O^ iSP m -*I9!V27*01 

PERCENT CHANCE EWEKGY IS ■ tCOOQQ ^ - 


TO THE star; line 


(1) Typical printout for a data surface in tne exhaust plume* 

(2) ijome points have been omitted for demonstration purposes. 


I i- |r 


ci::d 


! 






Live 

POINT 

OSCKlf 

- TEfiinE 

n 

MACN angle 

X 

prebsure 

H 

DENSITY 

theta 

temperature 

entropy 
CaS const. 

velocity 

LOCAL GaHMA 

0/. 

SHOCK **.5LE 

ITR 

2 

27 

JSTEB 

" CONTIN. 

•tn&l3*0i 

«3ia 27+01 
* lOn6R4[jO 

,7!0<i7*0l 

•9ki«6-dS 

•VV254402 

« 76063403 

.00000 
• 19811*09 

•19788*09 

•32999*01 

•ooccc 

fc 

Z 

2a 

INTER 

•“ CONTtN 

• 1066^401 
•72641401 

•31756401 

•V3S34-01 

• 790l»S*0l 
.99009-05 

.99073+02 

.53535*03 

•00000 

•19611404 

• 10095*05 
•12944*01 

•dooao 

4 

2 

29 

Inter 

• -ONTIN 

• E07S340t 
•64626401 

• 31660401- 
« 17734*01 

•6^639401 
• 242:i3*0S 

.53898*02 

•51393*03 

.00000 

.19811*09 

>•10199*05 

•12999*01 

♦ODCOC 

H 

2 

* 

zn 

INTER 

• CONTIN 

• tnai 2 tot 

•566 1S401 

• 3 l«i9T + 0l 
«AOn27-OZ 

<inino*o2 

.10777-05 

.58729*02 

.90986*03 

.00000 

.19011*09 

•10292*05 
■» 12999*0* 

•OOOCO 

4 

2 

21 

Inter 

• CONTlN 

•inSAH^ai 
•vsl 7V^0l 

•StJlS+Ol 

•Isis&'OZ 

• 1 1 6ft5402 
•V2748-06 

.63566*02 

.30837*03 

•00000 
#1961 t+OH 

•10373405 
• 1294^^01 

• coooo 

4 

2 

22 

INTER 

• CONTlN 

•tnvoR^oi 

•41 677401 - 

*31«27401 

t*ISn9S-03 

•13757402 

•14567-06 

•6B4064Q2 
- *22470403 

•00000 
•1961 1404 

•10443405 

.12944401 

•OQCOO 

5 

Z 

22 

INTER 

• CONTlN 

•ln9V64fli 

•34302401 

• *31 136*0 t 

.85775-0*1 

• 167(38402 

•4nV7O-07 

- -■ *7325^402 

.15406403 

«CoOqO 

•J98II40H 

*10502405 

•12944401 

- .GoCoD 

. 5 

2 

2H 

INTER 

• CONTlN 

• 10976401 
•27032401 

*3| 79*1*01 

« 1 1 09*1*09 

•2l 1 V0402 
•B305&*oa 

•761 10402 
-• *96649402 

•00000 

•19611^04 

•10549405 
-- .12999*01 

•OOOcO 

6 

Z 

M 

EREEbO 

• CONTlN 

•10907401 

•27700401 

POINT 

*31701*01 
• I 3907-09 , 

NO, 39 ON line 

• 206:^3402 
•99245-06 

2 HAS » 

:,77877402 

•10165403 

een dclcteo 

- *00000 
•19611404 

- .10595*05 
.12999*01 

•00003 

1 

4 


! 

1^ 


,'VaM- 








r r r i lfl 
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Sample Printout for Single -Phase Chemical Equilibrium Flow With Free Molecular Consideratlwa 







supersonic flo* analysis 

usiMG The uftcKHeeo-HUNT, 

•VILLE HULTIPLE 

ShOCX CCHPUTeR 

PR06«A« 










rASE NO. 

1 


■ f' 


RACE 23 




GASEOUS CHECK 

CASE R|TH 

rPEC HOLEClItAft 

calculations 

constdereo 






LINE 

POINT 

OSC^IP 

• 

f^zcint 

R 


R 

theta . 

erfTROPY 

velocity 

O/F 

JTR 







hach angle 

PRe^SURE 

D£nSITY 

■ temperature 

OaS const. 

LOCAL 6aKH* 

SHOCK angle 



4 

29 

INTER 

* 

CONTIN 

■11712*01 

• 3232<l«0t 

.99553*01 

•57858*02 

•OOOQO 

•10282+05 

♦0OOQD 

5 







. •sf6S|40l 

«47a28*02 

• 1 !0l7-0S 

• *11599403 

•19811+09 

•12999+01 




* 

30 

INTER 


C0KT1N 

. 1 | 80 fl»fll 

.32158*01 

»1 1297*02 

.62204402 

•OOOOO 

•ln3S7+05 

•00000 









• 1371 1*’02 

• 5250<*-O6 

.32776403 

•19811+09 

•12999+01 


•' • • 


4 

31 

inter 


CONTIN • 

*1 ie9o*oi 

• 3l«07*0t. 

' . • 13038*02 

.66612*02 

.00000 

•109Z3+OS 

<•00000 








• <13988*01 

•71057-03 

•20727-06 

.2991-9*03 

•19811+09 - 

‘ •12999+01 




4 

32 

INTER 


FREE H 

•1|95a*01 

• 31a2<)*0I . 

' •12576902 

.693<«<4*02 

•00000 

.•>09Se+OS 

•00000 

% 

U> 

1 


■ * 

, 



• <ISA07«01 

•2IA50-03 

•75114-07 

.20930+03 

- .19811+09 

•16670+01 



00 

p— 

4 

33 

Inter 


FREE H 

-*12013tQI 

•3lAS6«ai 

.19715*02, 

.73396*02 

•OOOOO 

• l0!>03+0b 

- *00000 ‘ 

o:-; 1 







' .3R782*0I 

• <43*79-0*1 

.20778-07 

.15280+03 

•19811+09 

•16670+01 




4 

3H 

INTER 


FREE H 

•I7073t0l 

• 31«t5<»01 

• lai 17*02 

•78371+02 

•OOOOO 

•1059S+0S 

: *00000 

' 







•3lS29*0l 

•72497-OS 

•5173,-.- 

.10185+03 

•19811+09 

■ .16670+01 




percent CHrmOC In mass* HOhENTUH ANn ENERfiY NUKErICAL twTeCRATlON FOR tiNE 6 RELfTtVE TO THE STAR? UtNE 

The percent change in Hass feor ts ■ -aiAYRST^oi 
RERCCMT change in HOHENTUK is ■ ,18R8S-*0T |SF * - - - -• ' 

PERCENT Change in energy is • .oofloo ‘ 


NOTES; (1) Typical printout for a data surface containing free molecular points 
(2) Some points have been omitted for demonstration purposes. 






Sample Printout for Single -Phase 
Finite Hate Chemistry Flow 
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I 1 

i 


LI 


Li 


I 
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Sample Printout for Single-Phasti Finite Kate Chemistry Flow 


S>J^e»S«lMrC FLO» analysis USIMC the LOC<HEEO.huNTSVILLC HULTIMLE shock COHPUtEH hhosram 

G*'S-f’“*Rf|CLf“FCo* 'SoVVrrbN ; 

, _ • _ _ CASE NO, 21 page 1 


case 2! « SOOLHF A/I CO«E» 0/F»2,2 t FINITE RATE, |NVISCir>i VAR 0/F 

__ P’-'H CONTROL PARAHFTERS 

ICONIII KOMI2I fCONiJi ' ICONjy) U0M3I fCoHT5T“ ITOTITTT" ICimiBT 

3 2. 2l 2 I 0 ■ 1 3 

lCO»4t?I _ ICOMIO* _ ICONltlJ ICO'lfiai ICONIIl* tCONMRl ICONIIS), ICONlIil 

0 ' 50 ' ' 2l ■ I 0 0 ‘ 0 ■■■ 3QI0 

u> 

^ " FL6*‘CaI.CULATION5 ARITTh ENfiCrSil units a|TH fHE“j»,)t ”coOB'dl*lAIES" iH~f eeT * 

THE FLO* FIELD DATA R I LL' BE' HR I TtEN ON TAPE “ • ' ' 


TYPt: 

|TRAH?>- 

1 

B 

UI’PER B0UHDA3T 

C 

D 

£ 

hax 


i 

•boobo 

•oooao 

gOOOQO 

• iTTRSASo" 

73Tfff!-0T 

T205IT+1}’ir 

i 

0 

• issitnfcs^ 



»D 03 on 

LOftCR boundary 

_ ,»00000 

*00000 _ 

.83333*01 


ITPANS 

A 

ft 

c. 

^0 ■ 

e' “ 

HAX 

„ 2 

0 

•oooob 

rOOCQO 

vOOoon 

•Qopop 

*00000 

•8£333*0I 



OsW 

^9 


so 


Sample Printout for Slngle-Phaae Finite Rate Chemiatrr flow 


«fge:_£_ TMgllHQp»«t>HtC M •E*tTt6M pita 


~Hj , wVh k ,hm , I c t Jtr c i KBur » 1 0 roo 


3 W vtscosirr. 

eXFOHKNt 


« 7 QoooDna*ao 

• 4 ^oaoq(i*co 





_JCACT I PMg_XElN_g COWSfOtw CD 


— @ ^ ^ (01 


Oh * CD 

_ 0 H ♦ OjL 

c«a ♦ On 

CK 4 « o 

CHJO * OH 


!7 

CH20 


"o * 

. 1* 

- CH20 

* 

PI 

|7 

CMO 

<* 

Oh 

^20 


._* 

H 

21 

CHQ 

* 

0 

,22 

- CHO _ 


02 

23 

tHD 

• 

Hi 


■ CMD ♦ M 

^_CHD ±^n 

p CiiO * Ol 

-•-JO 1 -H; 

“ CO ♦ M; 


OH 

>'2 *jri_ 
MJO 


2*214^22 
T*2 B 6»tS 
I • 377 * 1 ■ 
l•Otf•U 

_ 0>73<;*a7 
2MtD*l3 

4«02a*0* 

4« 727*07 
♦•□2^412^ 



2«IOt*13 

S*723*| 1 

|- 32 ^*J 3 

f«470*l0 

!• 109*14 

1»26VI7 ^ 

5*D011U-, 

It27$*»7 
_ S«OOI*I1_ 
7*230*13 


' 0 

Vtf 

•D 

*370 pO~ 
■' *0 
•bOod^d' 
-todo^o 

.0 

*270 0*0 

i4ob;o 

_*itoo*o 

*5000.0 

_-sooo*o 

-7100*0 

mO_ 

*0 

.-^>00*C» 

•0 * 

^*35000.0 

•o 

*1000 0*0 

;r" 

__ *1400.0 _ 
•15000*0 


■-WC «*TT^t 

2 ^ 

I 7 

1 t 


^ Group 17 


CAfitTTtc 5 PCcit 5 trtNfi coHs*bcotcr^ 2 £ 


-PL, »>00,c i_l*Oa.C«l_ 

2*00 CG2 * 1*00 H 

t«oa cHzg >-iiOii_xiie- 


-• ! SSIS *_l'. 9 §.si. — L 4 faa_H 29 j_li 50 "hsl _ti.OB n« 

1*00 KO * t.oo ON • 1*00 0 1 1*00 02 ^rt»9Q CH 3 


— s-^g-L i. it o q CHI — iL_Lioa-£S «-tloa hi oo.oo h*o . i.ea hhs ; i.aa at 

J.oo c« , i.oa H , t.ao as , a.aa on , i.oe a ri.ea « — ^• | ^ ge tui 

.». _ , 1*00 ‘"20 itOC CMO 


1*00 C 
3,00 C02 


-. 1*00 CH 5 
* 1*00 H 


.1 1*50 CO 
« I too HO 


t 1*Q0 H2 
» 1*00 OH 


•10*09 m 20 , t>OQ HmS . 1*00 HZ 

• 1*00 0 '. 10*00 02 . 1*00 CH 3 


r^*^ **'^ fwH ii l a*i. I,-... r— - r -I 

Uwtx e H ti L- . I - „ . ,- -■ 


czj cr 


r*n 






^ M CT3 CI3 


CZZj ; — n 


Sample Printout for Single-Phase Finite Rate Chemistry Flow 


9i»tcic «Qt.r‘fB«CTfoHS.0K The start^linc jiftc too ^ban circs 

_ 




CMt_, C O 

•20700*90 t*ifi20«02 


M? VJV HZO 

*t5l5D*00 »0S7ogvf}3 


C0» it M9 

• 12^70.02 *2S.S10«D0 *ST7«g-DS ^DOODO "^00006“ 


2 

' ‘c' 

CH9’ 

CD 

' M 2 

H 20 

' nh3 


.T9JD0-OJ 

, 1X990*00 _ 

p4334D-02_ 

.**3_"*p*00 

,4***3-32 

«MS*Q. 

Jf. 

OJM 

0 

_ «2 _ 

CH3 

CHlO 

cko 


•00300 

•oncoo 

•aoQoo 

•OODOD 

■ OOOO 3 '' 

•oobOF 

3 

' c 

CM* 

CO 

~H 2 

M23 

HM3 


,57070*01 ^ 

^ *17^70*00^ 

_m 4^ * 0*01 

_**70*0*00 

•1*450-01 

•fleB*Q. 

.3 

OH 

0 

02 

CM3 

CH2C 

cmo 


•OQODO 

«o?obo 

•anoQo 

•ODOOO 

pGQOOO 

"•Or» 000 r 

9 

r 

CM* ““ 

CO K 2 

MJO , . 

mm3 


• 00000 _ 

._ •22*30*01 

• 1 *4^*00^ 

♦*05tp*00 

•* 00 * 0*01 

•JSDIg. 

9 



D 

02 

CM3 

CH20 

cmo 


pTO 2 A 0 . 0 S 

•ooaoQ 

•oqoSB ' 

•oflobo 

tOOQOO 

'•00030' 

5 

C 

CM* 

'Co * - 

H 2 

HZO 

mm3 


•eopoo^ 

•32**0*04 

J \ 579^00 

•3)430*00 

•21750*00 

• 2S52o« 

5_ 

OK 

• i isfo-oi 

□ 

,274*0-0* 

02 

• 173*009 

CM3 

•anoart 

_ fMJO 

„CM 0 


C02 ■ H 


/Groap 18 


• iHlo-ot 


OM 

*V2»tiD^;9r 


0M_ 

•3t|4C-QI 


CMR CO ‘ 

• 00000 _ <1g3Stl*0o 

0 Oj 

. tof^SHfi — - 

‘CNf 

*00000 

0 Or 

^>T^IW5f ;T 2 1 7 0*0 1 — 


H2 

jlS,2Tc*pO 


M2 

*4SBlooi 


Co' 

»fiAT40*01 


M 2 

•s«t2e-oi 


M20 

«3414q*00 


HZ9 

•2S4^0*OO 


H20 ■ - 

•3|49o*0Q 


N2 ' C02 H - HO 

• 95090-05 *10l 00*01 •23370*02 


HM) -M2 " CCJ -H' ■• - MO ■ 

•OODOO •2290^t00 «Tt< 50*01 _*ll7oo*0l *01070*02 


HH3 ' — M2 C02 H MD 

* 32*50*30 **9300*01 *94lOD-D2 •19290*01 


NOTE: Some points have been omitted for demonstration purposes. 
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Sample Printout for Single-Phase Finite Hate Chemistry Flow 


SUPCBSOmC FLOW AW»LVStS US}»IJ5 ThC L9CKHEeO»HUNT«VTtLC fSULTIPtE SHOCK COHPOTER PROSRKH 

G*S>P«RTICLE PCo»~SoCw'TIoN 

- . . . . • CASE H0» 21 page 2 

CASE 21 - SOOtOF .6/1 COME» _C/r«2,2 « .Ff^fTE RATE, JNV15C10, VAR 0/F 

CTME PQ lWT DSCRtP - RCGlHS R X _ M THeTA ENTROPV VEtOCITY M-TOTaL ITS 

PACH angle PRESSURE “"DENSITY TEhPERaToWe 6a'S ' COMsT; LdCAL GARNI SHOCK ANCLE 

.. . . .... TO* PO* S* ■ 

t INPUT COMTIN <00000 •0<»|g7-02 _ .*>0275*01 <000A0 *90000 *3I052*0S .I322S*0B 0 

.767HS*02 '«275iT* 03 ♦SsSli-OS ,I8»»3*0S *37T93*0«| ‘ *12660*01 

«2l660*Qi > aS1P2»*03 *00000 

CHEPICAL SPECIE HOLE FRACTIONS ' ' - - - — 


c 

7.9785-02 

CH-t 

2gO781»0j CO 

6.3879-09 

H2 

9,3153-01 

H20 

WH2 

1* 2571-03 

N2 

2«d3l?-0l 

C02 

5.6369-06 

H 

0*0000 tiO 

C*OOOQ 

OH 

0^0000 

0 g.oooo 

02 

Q.OOOO 

CH3 

0*0000 

CHZO 

o.oooo 

CHO 

0«0000 






- 















1 

? iN»in 

- CONTlN .19561-02 

*B9t6»-0? 


•io29|*0> 

.TH6H + 00 #00000 


T3l”i*09 

* 

12989*08 t} 




•76336*02 

.27990*03 


•53672-32 

at 92 << 2*0^ #3B26o^OH 

*12 .2*01 






*22006*09 

<51979*03 


•00000 






chemical specif mole fractions 









c 

7.9109-02 


1*8991-01 CO 

'6*3363-03 

H2 

9, 3862-01 

M20 6.9993-03 

«H3 

'l•189l-0^ 

N2 

2.7B21-iJl 

CO? , 

, 1. 8311-09. 

Ji 

n*009O no 

JLjOBOQ 


e.oopo . 

0 o#oooo 

02 

0*0000 

CH3 

o.cooo 


CMiO 0.0300 CHO 0*0000 


I 3 INPUT - COHTIN .39122-02 **SI6T-o2 *I023b*QI '.15011*01 *C0000 *32926*0S *11265*09 0 

.77629*02 *27975*03 *50759-02 *2o73S*Oh' *37591*09 *12670*01 

.23R S9*0»I tS|5p7*03 <00000 

CHCKICaL specif hole fractions ^ 


c 

5.7079-02 

CK*f 


CO 

6,2999-02 

H2 

9,7093-01 

H2n 

i .6651-02 

NH3 

8.8096-09 

h2 

2.6612-01 

C02 

ru^Q 

1 .6971-03 
O.vCOD 

H 

f ^0 

G*COG0 

A,oono 

NO 

0*0000 

OH 

g.oooo 

0 

6*0000 

02 

0<0000 

CH3 

0.0000 


I <* INP'JT - CONTIn <SQ6e2>02 <Bhi* 7-02 ~< 10219*01 <22969Vot ' <dddOO~ 

. <7r756*02 <27276*03 <93259-02 <26733*09 *33969*09 

• 3n969«0<| <5|2 q3*03 *00000 

. CHEHICAL specie mole fractions ... 

C o.ocoo CH9 2*2633-02 C» 1.6692-01 H2 9. 8516-01 H20 “ 6,0067-02 Nm3 

C02 . 7,9119,33 H L»2iZJ.rfla hO 2<B9S 3- 07 OH .7,Q268-06 0 22.2P59 ?2_ 

CH20 0.0000 CMC 0.0000 


*35192*09" "i6929l*07 * o 

•>3030*01 


3*5ai9>09 N2 2.S733-C1 

O.qoCO 5»2 O.CvJGO 


NOTES: (1) Typical printout for the startline data surface. 

(2) Some points have been omitted for demonstration purposes. 
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Sample Printout for Single-Phase Finite Hate Chemistry Flow 


S0*’E«S<1NIC TLO'* A»:»LTStS IjSjHe ThF (.f>C AHIfEO-HUWl S V I LL C MUlTtPLC SHOCK COHpUTfT? PR0€RAH 

6AS»p*RtICLfrLo*i''SoLVTTo« 

C**:C hO, ?j 


PACE S6 


CAST 21 - EOOLOr 6/1 COME, 0/F«7,? , FlHlTE BATE, t«VIsClf), VAR 0/F 


limk poiHT DscRiP - BraiHe 


<ACH angle 
TO* 


PPESS'IRE 

* 


M 

DEMSIty* 

s* 


TheT* 


entropy 


VEtOCITY 


H-*TOT*t I TP 
SHOCIC ANGLE ■ 


1 if^lL - roNTiN 


fHf.MCAt SPECIE HOLE FRACTIONS 


•c^cao 

,?9fl96402 


.A2772-0! 
*ASt Z0*02 
♦ 3B36***03 


*00000 


•oooro 
• laezS+oH 


*9l272*0S 
• 379934>0^ 


• 529H7-*0S 
»13C.1I^0I 


•!3l9H*c^ 


c 


CHS 

2.37B!-0|^ 


6,38?<l-09 

H2 

<*.3153*01 

H20 

R,S70S>0*i 

NK3 

1, 207 1-03 

n2 

2,n3i2-ci 

^07 

rn^G 

S*.»3AS-OA 
s. 17'>5-|0 

CHO 

3.B528-! 9 
1, |3Sl>!B 

MO 

C*00C0 

OH 

1.73V7-25 

,0 

3.7207-35 

02 “ 

0*00r.0 

CH3 

3*0251-10 


■ 










iyO 

?i Y'AL*. 

- CONTIS .SJA39...CM 

.55«5?-bt 


•19568^0l 

•l5dob*02 *7701 7+05 

;67522*04 

*36075+07 3 




t3«;733*02 

.70384*02 


.I06S6-02 

.37807*04 .25158*04 

.12515*01 





•S6035*0B 

,355IB*03 


<00000 




CHrrttf.At ^PFCir 

hOLT Fractions 







c 

o.nn^" 

CH-: 

9*960**^0ft , CO ' ' 

Ji7(}|9-0| 

H2 

2.1414-01 

H2C 3.0|72-0I NH3 

8.3046-96 

M2 3.0165-01 

rc? 

a. 3*?06-n2 

M 

3*9555*03 wO 

1 .T|7o-04 

OH 

6* 3099*09 

0 6*9863*06 02 

4*3406-06 

ChC 1.927t-0a 

CK?C 


CHO 

1*HI 18-05 











PRESSURE 

Integration results 



88 



FORCEX 

forcev 


T0R02 

PELF* OELFV 

ISP 




-**'7Rb5*C3 

.tjooon 


•00000 

-• 19A07«n1 *00000 

•29229*03 1 

hi 

1 ^\iX 

- crjMT 

!n *00000 

*^9003-01 


•20292*oI 

*00000 *91339*05 

,52747*04 

•13195^00 a 




.27606*02“ 

,*318fl*02 


• 1791*5-02 

,13778*04 .37793*05 

■ .13017*01 





■22220*04 

.34437*03 


•OOOC0 




Ci^F'^l 

C4L SPECIE 

HOUE fractions 

* 






r 

y.mtss-o? 

Cn9 

2.07BI-C1 CO 

6,3674-04 

H2 

4,3153-01 

H?n 5,5705-04 Nh3 

1*2571*03 

N2 2*8312-01 

CCx 


H 

30760*19 kO 

0*OUOO 

OH 

1*5702-25 

b ^*5212-35 02 

0*0000 

CM3 2. 7582-18 

c, 0 

^i.l 736-ie 

CHO 

l’.2076-le 







61 

2! RAUL 

- CONTIS *52095-01 

.57141-01 


.17735*01 

* 

♦I50n0*02 *7B9ia^02 

*67916*04 

•36068+07 3 




*3{l44S*02 

.*8«2^*02 


•I07|8-02 

,37597*04 .25158*04 

• I252W09 





*5.«ij55*09 



•QDOno 




CHKHICAL •.PFCIE 

:OLC TRUCTIOnS 







c 

o.pono 

ruH 

S,9635-0fi CO 

l.40iS-0l 

H2 

2, IP 17-01 

H70 3«Ot^O*Ol Nh3 

8*3C97«06 

n2 3.0165-01 

CO? 

3.36S5-n7 

H 

3*41“3-03 wO 

> .7 1 ?o-0** 

OH 

6.1685-04 

O 6*3090*06 02 

9*2352*06 

CH3 t*9te7-*t36 

C H 5 O 


CHO 

1.4714-os 








FnRCEY 


PRFSSypc InTCSRATION PES^LTs 
rnacE^ tqrot OEi 

lOCoon *oonoo 


OFtrt 

»000u0 


ISP 

•.zsaos^fia 


NOTES: (1) Tjrpical printout for a data surface inside the nozzle. 

(2) Some points have been omitted for demonstration purposes. 
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czi: cm cm 


cm cm c 


(mo cm C3 


Sample Printout for Single-Phase Finite Rate Chemistry Flow 


SUrcRSONTC FL0»f AWAUYSfS USJWq Thf LOCKHCFD-HUMTSVI Lt£ HUlTIPlC SHOCK COHPU?£« PROGftAK 

fiA^^PARflfLE tLOn S^TToR 


I ■ 


CAsr NO, zi 


PAGC 89 


CASE 21 * SDOL»F 8/t CQWEi 0/F» g»2 > r^HI TE RATC, tNVtSC|D, VAR 0/F 
line point DSCfflP * RrSIHg R X 


II < 


25 PRN-MR • CONYtH 


Mach angle 



491755 *01 

*16722^02 

■4i307*oq 


pressure 

_**05!7 + 00 
• 39IoA*?j( 
4^3100*02 


H 

oenSitv 

5* 

•3SB07*01 

•10798-03 

•ODDOO 


THfTA 

TEMPEftrrUftE 


entropy 

"Gxrrtnrsrr' 


velocity 

TircAL 


•297a7*02 

•20740*09 


•12937«03 

;25I9S+04 


49301?*09 

•1293B40I 


H-TOTai ITR 
^ROCIfANGLe 


4381894^07 


chemical specie hole fractions 


c 

CO? 

CM20 

0 , 0:100 

3.5099*02 

2,2873-09 

CH9 

H 

CHO 

5*0639-08 

2,9995-03 

9,9038*05 

C8 

NO " 

i.3ef6*oi 

H2 

OH 

Z,I?17*0I 
1 • 1 603*04 

H20 340133-01 

0 f;3375-04 

NH3 

02 

8,3088-04 

1,49|2-D6 

H2 3*0180-01 

CH3 1.7015-08 

* 

J19 

24 PRN-HJf 

- CONTlN #91755 

-Oi 

•20517+00 


•37735+01 

. 33959+02 412137+03 

•V^722*0«‘ 

■■•34ie7.07 S 


00 

o 


1 15372*02 
' 4&8307404' 

chemical specie hole FRAtTTONS _ 

C o.oorro CH9 ^ 54083^-08" CO' 

_C02 3,5049- 02 H g^v94 S -Q3 NO 

CH20 'i,2a23«O0 CHO . 4*903B-0S 


4279J*J*0! 
',50287+02 

f ;3a9A-oi H2 
14^129-09 OH 


*83120-09 

400000 


• I 9277 + 09 


•25195*09 


2, 1997-01" 
1*1403-09 


H20 

0 


94dU3-ol 

1 43375-04 


NH3 

02 


•12999+01 


A*30a8-»04 

l«49|2-04 


N2 

CH3 


3,01P0-01 

U70l5*oe 


M9 27 PfiN-MP - CONTlN *9|755-0l .JOsiT+oo •39612+01 .37150+02 412937+03 494344+39 •36159+07 5 

• 19553+02 ^. 19433+01 ’ * 43039-09 417837+09 425195+09 413043+01 

• 44307+09 • 39331+02 « 000 o 6 

CHE^TfCAC SPECIE" HOL’E FPACTf OHS ' * 

C 0.0000 CH9 540439-08 CO t#3a94-Ot h2 2.1997-01 M20 3.0133-01 HhS 8#3088-06 ‘ N2 3.0t8t^01 

C02 3,5089*02 H "" “24999r-03' mO |47|29-09 OH 1,1403-04 0“ T*537S-04 02 ^l + 69l2-04 CH3 UTDIS-^S 

CH20 2.,7823-08 CHO 9.9038-05 _ _ _ „ 


li9 28 PHN-HIT - cWTIN 49|75b-0l 4^05 1 7+00 

•13981+01 

466307+09 •30288+02 

chemical SPECIE HOLE FRACTIONS _ 

C 0,0000 CH9 ^ 5,6439-08 CO I43e94*6r H2 

C02^ 3_, 5099-02 H 2, 9995*03 NO l47|29-09 OH 

CM20 '2.i823-Oa CHO 9*9038-05 


• 97135-09 416390+09 _?_2SI9^09 •13135+01 

•00000 

2^997-01 ~ H20 3*6l33-^ ^ i308S-04 ^ NZ ' 3.0180-01 

1 . 1603-09 0 I •3375-04 02 It69|2-Q4 CH3 JU 70 15-08 


NOTES: 


(1) Typical printout for a data surface containing a Prandtl-Meyer Expansion. 

(2) Some points have been omitted for demonstration purposes. 
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Sample P rintout for Single-Phase Finite Rate Chemistry Flow 


Stl^gRSONIC non ANALYSIS US|Ng THE L0€<CH E£O»HUHTSVltLE MUtTtPtt SHOCK COMPUTER PROORAM 





■“gA'S-A»RTTElT'TLO* 'S 0 TOTT 6 M 

CASE NO, 21 


PA5C tl5 

CASE 

2| - SOCLor 4/t C0N£» O/F-Z.E • FINITE 

RATE, IHVISCIO, VAR 0/F 



UwC 

POINT OSCRIF 

- UE6IHC R 

X 

N 

THFTA ENTROPT 

VELOCITY 

K-rotAL itr 




H*CH AHSLE 

__ TO* 

pRfss>'ifc 

_ _ PO* 

density TEHTlfkTTWf^ 

XOCAL GARNA 

SHOCK* AKGLr 

l?9 

1 .. 

- COMTIK »OCOOO 

•22391*00 

« 29B244.01 

•OOOOO *91677-05 

•69753*09 

#13167*00 2 



•19590*02 
• •?3518*0«( 

•12303*02 

•I99i7*03 

•50779-03 

•00000 

•91633*03 " i37993*09 

’■ ■ iI3SoT*OI 

CHEMICAL SPCCIT hole fractions 
C T, q7Q5«D2 CHR 2«07sr-0t CO 

C02 S«63AM-pO& H 

Sal 793-10 CHO 94 3S7^-le 

A, 3629-09 

" o*oooo 

H2 M.3tS3.0I 

OH 5.3A<I7«2R 

H20 8*5705-09 NH3 

0 0*0000 ' 02 ^ 

] #2571-03 
‘ 0*0000 

N2 2«63S2-0I 

CH3 t«9675-l9 

" li?9' 








39 FREE6D 

• cdntTn * 95 ^ 02-01 

•99069*01 

^To759+ba 
• I3972.*00 

•56Ils*Oi 

•60696—05 

.9B6?7*03 *25190*09 

n 0975*05“ 

•1351 9*01 

*36062*07 

CHEMICAL, 5»CCIE hole rfl«TllJMS 

•5dS90*d1 

•00000 




f 

CO? 

□aOOOO 

3*SOS6-o? 

CHS 6.0A50-06 C® 

H ?*79H6-03 no 

, 173879-01 
1 •7132-09 

H2 2.IR$f-0l 

OH I,|S£.9>0R 

H20 3*0l9'0-0f " Nh3 “ 

0 1 • 3377-06 02 

' B.atRS'-DA 
l.ARlA-OA 

N2 3*0166^01 

CH3 1*7016-06 

CH20 

2a?e?s-o« 

CHO 2tS9S6-QH 








POINT 

NO* 3? ON 

LINE 129 has been 

oeletco 

. 


13C 

1 ««LL 

• COMTtN •00000 

•22930*00 

• 29653*01 

•00000 *91677*05 

•69776*09 

#13166*06 2 



»IVS>I*02 

*E3$22«0<I 

^ 2798*02 

•l992S*03 

*40AQ9»03 

•aooao 

V’ 1 T if 5*0l ;T7TVT71PI 

— •rssn^or 


SPECIE WOLE FR*r,TlONS 

c 7 ,r7R5-o> CH<| 2*07fil«0t CO 

6«3829^09 

• H2 <(«3iS3-0l 

H20 R*S705-0R HH3 

|«2S7l-03 

UZ 2*63)2-01 

C02 

S.63«N>06 

5.|793>t0 

H 1.2<I|7-?1 HO 

CHO R.^SOR-ia 

'o*oooo 

OH S.2I&9-29 

0 0.0000'”' oi 

*’0#00Q0 

CH3 U9575-I? 



• 






130 

33 FREEBD 

• cbHTru »9« 167-01 

*99099*01 

'• 20776*00 
•13972*00 

^8 109*01 
*60679-05 

.603 f 8*02 *19056*03 

.95650*03 *25139*09 

•10975*05 

•13519*01 

•36069*07 2 

• 6630B4>09 

CHEHtCAl SPECIE HOLE FRACTIONS 

•Sa57R*0t' 

•OUOOQ 




f 

CO? 

CM 70 

0*0000 
3g5097-o? 
2 •2625-OS 

CHS S*0^SZ-06 CO 
H . nO 
CHO " ?*79A7-CS 

T.H76-0I 
_! *7 132-09 

H2 2,|957^"r 

OH 1* 1562-09 

H2n 3*0190-07 R'h^ 

0 1*3376-06 02 

ff73roT=06“ 
1 #6916-06 

R2 3,;oi87-Or 

CH3 1 •7018*06 


NOTES; (1) Typical printout for a data surface in the exhaust plume. 

(2) Some points have been omitted for demonstration purposes » 



3.3.2 Description o£ Unformatted Binary Output 


The binary tape output on unit 13 is described In this section. Initial 
input data are written on the first part of the data tape and gaseous and 
particle data are written out for each data point in the flow field. This tape 
is formatted so that it may be used by other auxiliary routines (plot, plume 
impingement or radiation). 

GROUP I ~ General Information 
Number of Records = 1 

Write ( ) (HEADER(I),1 = 1,60),ISPECS,IMETRIC 

• HEADER 

• run identification (2A4) 

• date (3A4) 

• description (55A4) 

• ISPECS = number of particle species to be 

considered 

• IMETRIC = 0 English flowfield units 

= 1 Metric flowfield units 


GROUP II - Gas Data 
Number of Records = 1 + IOF*IS 

Write ( ) (BETA(I), 1 = 1,6), lOF, 13 

• BETA is gas identification name (6A4) 

• lOF number of total enthalpy cuts through 

"Mollier chart" (max = 10) 

• IS number of entropy cuts (max = 2) 

DO M=l,IOF 
DO 1 = 1, IS 

Write ( ) IV.IDATA, ((TEMP(J,K), K = l, IDATA), J=l, IV),IVT, 
((CPM(J,K), K = l, 3), J=1.IVT), RSTAR.PINF, EMINF, 
GAMIN F, FINF, EXIN F,X SHIFT 

^Determined from ICON (9). 
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^ CM to m 


umm 


I 




• IV 

• IDATA 

• GAMINF 

• IVT 

• RSTAR 

• PINF 

• EMINF 

• EXINF 

• FINF 

• TEMP 

• XSHIFT 


number of velocity cuts through "Mollier 
chart" for this total enthalpy and entropy 
+ 2 (max = 15) 

number of gaseous species present for this 
total enthalpy and entropy (max = 98) 

freestream isentropic exponent 

= IV-2 

throat radius (ft or meters) 
ambient pressure (psf or Newtons/m ) 
freestream or external stream Mach number 
limit to which equation applies 

linear static pressure gradient (slope) 9 approach 

contains the following information for each value 
of IOF,IS 

nozzle length (ft or meters) 


123456789 



Htg P T S ilJ y Me X, 
I f M^ 1 


IDATA 

/A4\ / \ Species 

\A4) \ ) Name 

Xp 


c 

o 

n 

s 

t 


c 

o 

n 

s 

t 


. a a 

. n n 

. t t 

. I .1 

rVHtg P T S itJ y 


M Xj 


Mole 

Fractions 


u 

D 

D 

U 

U 

D 

0 

0 

D 

0 


• freeze pressure (atm) 

• Htg total enthalpy of the gas (cal/gm) 

• P pressure (atm) 

• T temperature (°K) 

• S entropy (cal/gm-°K) 

• (]i molecular weight (gm/gm-mole) 
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• y 

• 

. M* 

• M 

• CPM 


1 

2 

3 


isentropic exponent 
chamber Mach number = 0 
throat Mach number = 1 
Mach number for this table entry 

contains the following information 
1 2 3 

Pr „ Cp 


IV T 


• Pr 

• ^ 


GROUP m - Gas 


Prandtl number 
viscosity (poise) 

specific heat at constant pressure (cal/gm-°K) 
Partical Data 


Number of Records s lSPECS+1 


Write ( ) IDUM, ((PSP(I, J), 1=1,2), J = l, ISPECS) 

• IDUM dummy word 

• PSP(1,J) mass density of j particle {slug/ft or kg^/m ) 

• PSP(2,J) radius (ft or m) 

DO 1=1, ISPECS 

Write ( ) NTABl,TMELT,HSOL,HLlQ, (HFIT(N, 1,1), HFIT(N, 2,1), 
N = l, NTAB) 

• NTABl 

• TMELT 

• HSOL 

• HLIQ 

• HFIT(N, 1,1) 
a HFIT(N, 2,1) 

• NTAB 


number of table entries for this species 
melt temperature (°R or °K) 

enthalpy before phase change (ft^sec^-°R or m^/s ec^-'^K) 

2 2 o 2 2 

enthalpy after phase change (ft /sec - R or m /sec - K) 
temperature (°R or °K) 
enthalpy (ft^/sec^ or m^/sec^l 
number of table entries for this species 


Note that if NTAB = 1 species is ideal and HFIT (1, 1, I) = (specific heat of 

liquid) and HFIT(1, 2,I) = Cpg (specific heat of the solid). 
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LMSC-HREC TB D390040 


GROUP IV - Flow field Data 


Number of Records = 1 + 2 * ILAST 


Write ( ) (ILAST, 1-1,7), THRUST, AEXIT, lEXIT 


ILAST 


THRUST 

AEXIT 


• lEXIT 


number of data points on the following normal 
surface. If ILAST = 0 there is no information 
to follow 

thrust (lb, 07' Newtons) 

* 2 2 
exit plane ar ^a (ft or m ) 


exit flag 


0 if no exit 

1 if exit 


Write ( ) ((ITYPE, R, X, M, 0, S, /i* , 6, Htg), 1=1, ILAST), (V, 1=1, ILAST), 

(W 1 = 1, ILAST), ((p,P,T,y,^), 1 = 1, ILAST) 

& 


• ITYPE 


identifies type of point (wall, shock, 
interior, etc.) 

0 input point 

1 interior point 

2 wall point 

3 free boundary 

4 upstream shock point 

5 Prandtl-Meyer point 

6 downstream shock point 

7 slip line 

8 shock intersection point 

9 vibrational mode frozen 

10 rotational mode frozen 

11 translational mode frozen 


y 


L, I 


radial coordinate (ft or ml 
axial coordinate (ft or m) 
Mach number 


flow angle (rad) 

entropy (ft^/sec^-°R or m^/sec^-°K) 
Mach angle (rad) 
shock angle (rad) 

2 2 2 2 
gas total enthalpy (ft /sec or m /sec ) 


I I 
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LMSC-HREC TR D390040 


• V 


• P 

• P 

• T 

• y 

• R 


velocity (ft/sec or m/sec) 

mass Aow between this streamline and axis 
(slug/sec or kg^/sec) 

gas density (slug/ft^ or kg /m^) 

2 2 ^ 

pressure (Ibf-ft or N/m ) 
temperature (°R or °K) 
is entropic exponent 

universal gas constant divided by molecular 
weight (ft^/sec^-°R or m^/sec^-°K) 


DO I = 1, ILAST 


Write ( )ISP, ((U. V, T, H, p), J=1,ISP), ILIMIT 


• ISP 

• U 

• V 

• T 

• H 

• P 

• ILIMIT 


number of particle sizes at this point 
axial velocity component (ft/sec or m/sec) 
radial velocity component (ft/sec or m/sec) 
temperature (°R or °K) 

enthalpy (ft^/sec^ or m^/sec^) 

3 3 

particle density (slug/ft or kg^/m ) 

0| not a limiting streamline 

1 1 is a limiting streamline 


NOTE; The flowfield data are repetitively stored on tape as indicated above — 
normal surface after normal surface. When ILAST = 0 the end of the 
data has been reached. 
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3.4 PROGRAM UTILIZATION COMMENTS 


The primary purpose of this section is to provide the prospective user 
of Lockheed's RAMP program backup information for inputting and trouble- 
shooting the code. This section also presents the authors' experience on 
what to look for and what to do if certain problems are encountered 
while using the program. Included in the discussion are; 

1. A description of each mesh control parameter and some 

suggested values 

2. An explanation of "error" messages and other diagnostics, and 

3» Problems commonly encountered and suggestions to correct them. 

It is envisioned that this section will aid the user in becoming familiar 
with the use of the code. However, only experience in utilizing the code will 
provide knowledge for applying the code. 

3.4.1 Mesh Control Variables 

This subsection discusses each of the mesh control parameters which 
the program utilizes. The function of each of these parameters is discussed 
in relation to potential mesh control problems in construction of a typical 
flow solution. 

Control of the insertion of interior points and the deletion of points on 
a Imown data surface is the function of subroutine CHECK. CHECK is nor- 
mally called from subroutine PHASEl after a line has been completed unless 
a special circumstance is encountered where a point needs to be inserted or 
deleted due to streamline crossings. The axial step control is performed by 
PHASEl. 


3. 4. 1.1 Lower Wall Interpolation Factor (STEP(8)) 

Characteristic theory governs the construction of the initial data point 
on a new surface. The maximum axial step at the lower boundary is deter 
mined by the intersection of the right-running characteristic (RRC) emanating 
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from the first interior point on the normal and the lower boundary. The 
RRC is inclined at the local characteristic angle toward the lower 

boundary. The axial step downstream of the known data surface is deter- 
mined by the Intersection of the RRC line (which is located a factor of 
STEP(8) (< l.O) of the distance between the axis point and first interior 
point) with the lower boundary. Details of this construction are noted in 
the sketch below. 



AXj = Initial Axial Step 

AR^ = Initial Radial Point Spacing 

AX = Maximum Initial Axial Step 

0 

fl = Local Characteristic Angle 
V = Local Velocity 
The ARRC Step AX^ is given by; 

ARj = AR^[l - STEP (8)] 

AX, = AR * STEP{8) * tan(ir/2 - Ml) 

1 O 1 
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Consequently, STEP(8) is the primary parameter which controls the mesh 
construction and also has a significant impact on program run time. The 
radial point spacing on the start or previous line also helps to determine the 
initial axial step. The closer the point spacing the smaller the axial step. 


Step size also affects the conservation of mass flow, momentum and 
energy. Most cases will maintain good mass flow conservation. However, 
there can be cases where poor mass flow conservation is observed. In these 
instances, normally there is an error in some of the input data. If no error 
is detected it may be necessary to take smaller step sizes to maintain the 
particle mass flow conservation. Gaseous cases with larger gradients across 
the flow field may also require smaller steps and more mesh points in order 
to conserve mass flow. 


3.4. 1.2 Axis Point Insertion Criteria (STEP(6)) 

The axis point insertion control parameter, STEP(6), limits the maxi- 
mum axial step between data surfaces. If the data surface location between 
axis points for einy reason exceeds STEP(6), the interpolation factor for the 
lower wall solution (STEP(8)) wi, ’ be multiplied by 0.8. This results in a 
smaller axial step. The new axis point will be recomputed until it is less 
than a distance of STEP(6) away from the known axis point. 

Typical values for STEP(6) are; 0.1 throat radii for tvfo-phase nozzle flow 
problems, 0,1 exit radii for two -phase plume flow problems and 0.2 throat/radius 
fo * gas only nozzle solution- and 0.2 exit radius for gas only plume flews. 

3. 4. 1.3 Interior Point Insertion Criteri (STEP(3)) 

The purpose of the point insertion capability is to provide control of 
the streamline spacing in a rapidly expanding flow. Insertion of a stream- 
line is accomplished in the following manner. The distance along a normal 
line between two grid points is computed in subroutine CHECK. If this dis- 
tance exceeds STEP(3) a new streamline will be inserted midway between the 
two existing points. The new streamline point will be retained as the solu- 
tion progresses. 
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3, 4. 1.4 Particle Limiting Streamline Insertion Criteria (STEP{9)) 

This parameter provides for control of streamline spacing on a data sur- 
face based on the entrop/ difference between two streamlines. This option is 
only used for two-phase flow cases and then only between a particle limiting 
streamline and the adjoint gas streamline. STEP(9) is the maximum allowable 
percentage change in entropy near a particle limiting streamline. The procedure 
is to first calculate the entropy difference (AS) between the particle limiting 
streamline and the adjacent streamline, above or below the particle limiting 
streamline. If AS is greater than STEP(9) times the entropy level of the limit- 
ing streamline then a new streamline point will be inserted midway between the 
two points. The procedure is identical to the interior point insertion scheme 
once the program has determined that a point should be added. 

This mesh control parameter is utilized to avoid large entropy gradients 
near limiting streamlines. There will naturally be an entropy •gradient across 
a limiting streamline, from a region where particles are present to a gas -only 
region. However, use of the STEP (9) control can minimize the chance of en- 
countering numerical difficulties near limiting streamlines in two-phase flow 
problems. 

3. 4. 1.5 Prandtl-Meyer Integration, (STEP(l)) 

This parameter controls the number of mesh points which are distri- 
buted through the Prandtl-Meyer expansion. STEP(l) is the size of the 
integration step in degrees that is used to numerically integrate the Prandtl- 
Meyer function. STEP(l) then becomes the number of degrees between mesh 
points in the expansion fan, 

3. 4. 1.6 Point Deletion Criteria (STEP{7)) 

The purpose of this mesh control parameter is to limit the spacing of 
adjacent streamline points on a normal to a minimum value. When stream- 
lines begin to converge the solution can encounter numerical difficulty when 
computing locations of intersections of characteristic lines with normals to 
streamlines . 
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The procedure is to determine the radial and axial spacing, the Mach 
number difference and flow angle differences between two consecutive points 
on a normal (AR, AX, AM, A6). The average R, X, Mach number and flow 
angle for the two points are calculated (R,X,M,0). R and X are multiplied 
by STEP(7) and M and 6 are multiplied by built in values. If AR and AX are 
less than the average locations (R and X) times STEP(7) and AM and A6 are 
less than the average values (M and 6) times the built -iin values then one of 
the two points will be deleted. This procedure 1^; shown in the sketch on the 
following page. 

The program will not delete the following types of points; upper or 
lower boundary, free boundary, Prandtl-Meyer, shock, slLpline or limiting 
streamlines. Normally, the I point is deleted. 



AM iMit.KJ ’ + 

AO » lOfI ^ 

AR > IRU. ' HC + l. Ki; 

AN - IXU, Ki - XfJtl.KH 
& :ll/2)feil. KJ 4 9(i + l, KtJ 
3? t xn^Mo] 

it K> ' RlHI.KjJ 

M + MlfH.Kl] 

X * \ + fiTEPCTl 
H -R^ HT£Pi71 
\i " M 02 
0 "O ,0' 


U <AR hT. R. AN1>,AX. aNA. AM LT.M. AND. AO, LT-'OJ 

Thvn Ihe ptiini l + l. K will Ite lielrlrd 

whrrv M !■ *hi» local Mach ruirnbvr and O Iho local flow anglv 
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3.4. 1,7 Finite Rate Chemistry Mesh Controls 

The mesh control parameters for a finite rate chemistry case are the 
same as In the previous sections with the following exception. 

The lower wall interpolation factor, STEP{8), is overriden by the ''CFL" 
condition which requires that the Mach lines from any new point must inter- 
sect the base lire between the base point and either of its neighboring points. 
This condition is assured by the equation 

CFL = Vm^ - I 

where is the normal diafcance between any E adjacent points on the base 
line and M is the Mach number. CFL is the maximum distance along the 
streamline through the base point the new point may extend and still ensure 
that the Mach lines intersect the adjacent points. This distance is calculated 
for each point on the base line and the minimum distance is used for the entire 
new line. 


3.4. 1.8 Recommended Mesh Control Variables 

Table 3-8 presents a set of recommended values for the mesh control 
variables. This set of mesh control values has been found by the authors to 
be general for most of the cases which have been run. However, there prob- 
ably will be cases where the ruti time or conservation of mass flow, energy 
and momentum will be unsatisfactory and adjustments to the mesh will be 
required. As the user becomes familiar with the code and runs more cases, 
changes in the mesh control variables and the resulting effect on the flow 
solution will become apparent. 

3.4. 1.9 Mesh Spacing Effect on Run Time and Conservation Equations 

Rur time is significantly affected by the point density for two reasons; 
(1) the v'iomputer run time is a direct function of the number of points on the 
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Table 3-8 

RECOMMENDED MESH CONTROL VALUES 




o 

rj 


STEP(l), Prandtl-Meyer Control 
STEP(3), Interior Insertion 
STEP{6), Axis Insertion 
STEP(7), Delete Criteria 
STEP(8), Axis Point Interpolation 
STEP(9), Limiting Streamline 



= Throat Radius 

R„ = Exit Radius 
E 

NOTE; If no limiting streamline, axis Insertion, or interior insertion control is desired 
input a large number (~ 1000). If no deletion is desired use an extremely small 
number (l.E-5). 




is:.: 


































normals, l.e., for the same ntunber of normal surfaces and twice the number 
of points on each normal there will be a factor of two difference in run time, 

(2) the more points on a given normal, the smaller will be the step size which 
will result in more execution time, i.e., twice as many points on a surface 
will result in the maximum axial step having one-half the length. This coupled 
with twice the points on the normal will resul.t in four times as much computer 
time. 


Coupled with conserving rusi time is the necessity that the solution be 
numerically valid, i.e., conserve mass, momentum and energy. The con- 
servation functions for numerical solutions of the type employed by the RAMP 
program are somewhat controlled by the mesh spacing. For flows which con- 
tain large gradients in flow properties it is desirable to have more mesh points 
to avoid any large errors in mass flow, system energy and momentum. Thus 
there is some happy median between run time euad s/t.'-em conservation. 

3.4.1.10 Point Spacing 

The type of solution which the RAMP code employs lends itself to uni- 
formly spaced points on each data surface. However, particular flow solutions 
which have large radial gradients require close point spacing in the region of 
the large gradients. For these cases, smaller axial steps are necessary. 

3.4.2 Explanation of Error Messages and Other Messages 

„ 1. Previously noted errors have propagated to lower boundary or 
problem limits have been reached. Case terminated. 

The program has terminated properly, the problem 
limits set by the user have been reached or another 
error which has been identified via a message has 
been encountered. 

2. Lower boundary solution will not converge. 

The program is unable to obtain a solution at the lower 
boundary within the user specified number of iterations. 

The code will back up the line a maximum of 10 times 
in order to try to obtain a solution. If no solution is 
reached then the execution will terminate, 

3-103 

LOCKHEED - HUNTSVtLLE RESEARCH & ENGINEERING CENTER 






3. Interior solution will not converge. 

The program is unable to obtain a solution for an interior 
point within the user specified number of iterations. The 
code will backup and take a smaller step. If the point still 
will not converge after backing up ten times then the solu- 
tion will be terminated. 

Possible causes of this problem are: 

• Input error in. boundary equations 

• Numerical difficulties due to large point spacing 
in regions of steep gradients. Use more points 
or take smaller steps. 

• If this occurs early in the solution, the startline 
may not be physically or numerically suited to 
the problem. Check the startline. 

• Check for obvious errors in thermodynamic data. 

4. Upper boundary solution will not converge 

The program is unable to obtain a solution at the upper 
boundary. Causes and fixes are same as item 3, 

5. Shock solution will not converge. Line terminated. 

The code is unable to obtain a solution for a shock point 
within the user specified number of iterations. If this 
occurs early in solution it could be due to an inconsistency 
of the startline and boundary equations . May be taking 
too large a step — decrease step size. 

6. ITSUB will not converge in BGMOFP 

Keal gas solution of Mach number as a function of pressure 
wilJ not converge within preset number of iterations. Check 
the thermodynamic tables for errors and also the plume 
boundary conditions. 

7. ITSUB will not converge in RGVOFM 

Real gas solution of velocity as a function of Mach number 
will not converge within preset number of iterations. Check 
the thermodynamic tables for errors. For two-phase, real 
gas cases with a startline input from cards, be sure all the 
input Mach numbers fall within the thermodynamic table 
entries . 

8. ITSUB WNC in THETPM 

Unable to balance the last Prandtl-Meyer point pressure 
with the back pressure at the free boundary or flow angle 
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at a solid boundary, within the preset number of iterations. 
This can be caused by poor thermodynamic table construction 
or incompatible plume boundary conditions. 

9. ITSUB WNC in AOASTR 

Unable to balance the mass flow at input A/A with mass 
flow at throat within the preset number of iterations. 

Check thermodynamic tables. 

10. , ITSUB WNC in TURN 

Unable to turn the flow through a specified turning angle 
within the preset number of Iterations. Usually caused 
by flow going subsonic. 

11. ITSUB WNC in OVEREX 

Unaole to turn the flow through a specified turning angle to 
match the plume boundary pressure within the preset number 
of iterations. Usually caused by the flow going subsonic. 

12. The following case cannot be found on the master tape. 

The program is unable to find the desired gas case among the 
cases present on the master tape. This is usually caused by 
the gas header card not matching any of the header cards 
which appear on the tape or the wrong tape was mounted. 

13. ITSUB WNC in HYPER 

Program is unable to find a velocity which will give the 
ambient boundary conditions within the number of preset 
iterations. Can be caused by trying to expand the flow too 
far or bad thermodynamic tables, 

14. Subsonic Mach number encountered in TOFV 

The characteristic theory utilizes Mach number in the 

definition of Mach angle (Vm^ - 1 ) and is limited to 
supersonic flow. Possible t^auses for this message are; 

• Flow went subsonic 

• Error in boundary equations 

• Error in other input data 

• A situation is encountered which the code 
is unable to handle. 

15. Negative velocity encountered in TOFV 

Something has happened during the solution which has 
resulted in a negative velocity being calculated. Prob- 
able causes are*. 
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• Error in boundary equations 

• Error in gas thermodynamic data 

• Mesh problem caused by too large a step in a 
region of steep gradients. Try taking smaller 
steps . 

• Program limitation. 

ITSUB does not converge in PHYSOL 

Subroutine PHYSOL is unable to determine the character- 
istic intersection with the known data surface within the 
preset number of iterations. This is usually caused by too 
small a mesh size or a data surface that has been input, 
which is not a true normal. 

Two straight lines in INRSCT are parallel 

Subroutine INRSCT's function is to determine the intersection 
of two straight lines. If two lines are found to be parallel 
this message is printed out. Usually caused by some incon- 
sistency in the Input data. 

Slipline computation does not converge in SLPLIN 

The program is unable to converge on the slipline points 
(i.e., match flow angle and pressure) within the preset 
number of iterations. Usually caused by taking too large 
a step. 

Characteristic lines diverge, last P-M point set free molecular 

Subroutine MOCSOL is unable to intersect right and left 
running lines while constructing the normal around a 
Prandtl -Meyer expansion. This is usually caused by trying 
to take too large a step past an expansion corner. 

MOCSOL woiild not converge 

MOCSOL is unable to find the intersection of two character- 
istic lines within the preset number of iterations. 

A problem with a RRC intersection with line X has been encountered. 
The line will be recalculated. 

This is the result of either an interior solution taking too 
many iterations or a situation where the program is unable 
to intersect the right running characteristic from the new 
point to the known data surface. The program will back up 
and take a smaller step for a maximum of ten iterations. 

If the same problem is still encountered the case will be 
terminated. This is usually caused by an error in a boundary 
equation, a startline which is not a normal, a poor point spacing. 
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22. Particle limiting streamline intersection with the boundary 

This message occurs whenever a particle limiting stream- 
line intersects a boundary (solid or free). The solution 
proceeds while assuming all mass which intersects the 
boundary passes on through. 

23. Point number X on line Y has been d'jleted 

This message is printed whenever a point is thrown out 
because it did not satisfy the mesh control criteria or 
whenever a gas and particle streamline cross. 

24. A new streamline has been inserted on line Y between points X and Z. 

This message will appear each time a point is added on a 
line due to mesh control criteria being exceeded between 
two points. 

25. Due to gas -particle streamline crossing the point X has been replaced 

This message occurs for two-phase cases whenever a gas and 
particle limiting streamline cross. The gas streamline is 
thrown out. 

26. Your are trying to throw out point X, the point is a wall, limiting 
streamline or free boundary point. You probably have an error 
in your input. 

This error message is usually due to an error in the startline 
or an error in the boundary equations. Check your input data. 

3.4.3 Problems Commonly Encountered and Suggested Fixes 

This section is intended to aid the user in utilizing the program and 
avoiding some common problems. Also included are some general comments 
on inputting the code. 


The following is a list of hints to the user: 

• The numerical scheme which the program utilizes lends itself to 
evenly spaced points. Therefore, when setting up a startline try 
to insure that the points are as evenly spaced as possible. The 
only exception to this rule is in the vicinity of large gradients in 
flow properties, (e.g., Prandtl -Meyer corners). The points in 
this region should be closer together and smaller axial steps 
should be taken. 
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In the region immediately downstream of a PrandtI-Meyer expansion 
it is necessary for the program to patch together a characteristic 
mesh with the streamline normal mesh (Section 6.9, Vol.I). This 
mesh construction can result in two unique problems. First, if the 
first normal beyond the corner is too far downstream of expansion, 
it is possible for the code to be unable to intersect characteristic 
lines. This normally will only occur for high altitude cases. To 
fix this take a small step. If too large a step is taken at lower 
altitudes, streamlines may cross which can result in a subsonic 
Mach number or negative velocity message. To correct, take 
smaller steps. On the other hand, if the first normal downstream 
of the corner is too close to the lip the points in the fan may be 
too close together. This may cause problems with characteristic 
line intersections with previous data surfaces and result in exces- 
sive iterations or no convergence of points in this region. It may 
also result in the necessity to take too small a step in order to 
proceed with the solution. To correct this problem, a slightly 
larger step must be taken so that the first normal is further down- 
stream of the corner. Below are sketches of normals which are 
too close and too far from expansion corners. 



of Expansion Corner 



C orner 
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• The tranaonic solution requires the location o£ the intersection of 
the startline with the axis (ZAX) and the nozzle wall (THIW). There 
is an option in the code to let the program calculate a ZAX based 
on the input THIW. This is accomplished by not inputting a value 
on the tranaonic namelist. The value of ZAX which the code com- 
putes will result in a near normal startline. It should also be noted 
that the startline must be supersonic so if a subsonic Mach number 
is encountered from the transonic solution the startline must be 
moved further downstream (Card 36). 

• Since the program uses streamlines and normals to streamlines 
to construct the mesh it is always assumed that each data surface 
is a true normal. If a startline is input which is not a normal, it 
is possible to encounter difficulties in getting the solution started. 
Below are three sketches of candidate initial data surfaces. Sketch A 





Sketch C — Normal Not Inclined Enough 
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is a true normal, Sketch B is inclined too much and Sketch C is 
not inclined enough. In the case of the data surface which is 
inclined too much the code will probably have trouble finding 
the characteristic line intersections with this surface during the 
next line’s solution. When the code is unable to obtain an inter- 
section, the new data surface is backed up until a solution is 
reached or if no solution is reached after backing up ten times 
the case is terminated, A normal which is not inclined enough 
will result in normal lines crossing as shown in Sketch C, The 
solution will usually have no trouble in obtaining a solution for 
the new data surface although several lines may overlap. To fix 
both of these cases, regenerate the startline so the normal line 
is a true normal. 

A large percentage of problems encountered are due to errors in 
the boundary equations. These errors can result in messages 
being printed out such as; subsonic Mach number, negative velocity 
or possible systems error messages due to bad interpolation factors. 
If any anomalies are encountered while the code is solving an upper 
boundary point, the following are some of the errors to look for: 

a. A discontinuity in boundary equations where they are 
supposed to match 

b. The boundary equations are not in the same units as the 
startline 

c. The startline does not fall on the first boundary equation 

d. For two-phase cases the input throat radius is not con- 
sistent with the throat equation 

e. There is an error in the equation itself. 

Care should be taken in selecting the particle size distribution for 
any particular case. If the particle sizes are too large for the 
motor being analyzed then the lags are too great, thereby compro- 
mising the results. If the sizes are too small then the particles 
may try to thermally and translationally equilibrate with the gas 
which may result in numerical problems. A discussion on how 
the authors determine mean sizes and distributions is contained 
in Appendix C of this volume. 

If the user is only interested in such things as nozzle wall pressure 
and initial plume expansion angle then a single particle size having 
the mean size for the motor is sufficient for good results. However, 
if the user is interested in two-phase impingement, then a good dis- 
tribution is necessary in order to get satisfactory impingement re- 
sults. Appendix C contains a discussion of particle distributicm. 

There are some specific dos and don'ts associated with inputting 
a startline with cards. The fol^^wing hints are what to be careful 
of when setting up a case where the startline is read from cards. 
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a. Make sure that the number of gaseous startUne points 
corresponds to the value input on Card 4 (ICON(3)). 

b. The gaseous startline points should be input starting 
from, the nozzle centerline and proceeding to the upper 
boundary. The particle properties should be input start- 
ing with the first point nearest the upper boundary which 
has particles present and inputting the particle data down 
to the nozzle centerline. For each point the particles 
should be input from the smallest size (particle 1) up to 
the largest size (particle 6). The same particle number 
must always be used for each specific size, 

c. A common mistake users make is to forget to input the 
number of gas points (NSETS, Card 23) which have par- 
ticles present. This only applies to two-phase cases. 

d. Whenever a restart is used it is necessary that the last 
point on the startline (upper boundary point) be a point on 
the first boundary equation. The first boundary equation 
must also be a type 1 or 2 boundary (conic or polynomial). 
Therefore, all boundary equations prior to the one which 
applies at the boundary startline point, must be removed 
and ICON (4) adjusted accordingly. Cases which are trying 
to be restarted in the plume require a fictitious boundary 
for the first equation. This equation consists of a straight 
line which passes through the boundary point and has the 
same slope. The next boundary equation should be the 
original free boundary equation. A sketch describing this 
requirement is shown below. 
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e. The code presently has a limit of 50 startline points. If 
a line has been punched which has more than 50 points, 
omit enough points to obtain 50 maximum. 

f. The Mach number which is input on the startline cards 
must be within the thermodynamic table entries for two- 
phase cases which utilize equilibrium tables with multiple 
enthalpy and entropy tables. This is normally a problem 
only for high altitude plume restarts. If this is ever en- 
countered contact the authors for a temporary change to 
the program so that gas velocity may be read in instead 
of Mach number. 

• If gas thermodyneunic data is coming from tape be sure to set ICON(I) = 2 
(Card 4) and also use exactly the same gas header card (Card 8) as was 
used by the TRAN72 program to generate the tape. 

• For gas data coming from cards be sure that the units of the gas prop- 
erties are consistent with the units identifier on the gas header card 
(Card . 

• The entropy and total enthalpy levels of any startlines input into the 
program must be consistent with the gas thermodynamic tables. This 
is generally only important in two-phase cases. If the startline was 
punched by the program on a previous run and the same gas thermo- 
dynamic tables are used then the gas entropy and total enthalpy levels 
are consistent. However, if the startline is generated by some other 
code, care should be taken to enter the entropy and total enthalpy to 
obtain the correct static gas properties (P,p, T). For ideal gas two- 
phase cases the total enthalpy is calculated as follows; 




= C 

p OL 


where C is the ideal gas C defined as C = 'yR/('y-l) and T_. is 
p P P CjJ-i 

the local total temperature including any two -phase losses. Tq and 
are the combustion chamber total temperature and pressure. The 
scatic pressure is calculated via the following relationship; 


P 




The local static temperature is calculated using the local total tempera- 
ture. 
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For equilibrium chemistry two-phase cases, the head loss due to 
the difference in total temperature between local and chamber con- 
ditions is accounted for by the change in entropy level between the 
total enthalpy tables. It is therefore necessary to use 2 entropy tables 
and more than one total enthalpy table for two-phase equilibrium 
cases. The user must also be sure that the gas total enthalpy at 
any point in the plume will never exceed that of the highest total 
enthalpy table (AH = 0) or be less than the lowest total enthalpy 
table (AH,^, = - AH max). A AII,p of -300 cal/gm is probably the 

largest heat loss that need be used in the modified TRAH72 pro- 
gram for two -phase cases. 

For finite rate chemistry cases the following precautions should be 
taken 

1. Be sure that the order in which the chemical species names 
appear are the same for the thermodynamic data tables , the 
startline mole fractions and the catalytic species. 

2. Be sure that the temperatures in the data tables are the same 
for each species and that the number of temperatures are the 
same. 

3. Be sure that the enthalpies and entropies are referenced to the 
same temperature for each species, 

4. The program is set up to "freeze" the chemistry on the startline 
and will keep the chemistry frozen until a complete normal has 
been computed. It is recommended that the startline should be 
as near to a normal as possible. 

5. The run time for a finite rate chemistry case is much longer 
than for an equilibrium case. 
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3.5 BRIEF DESCRIPTION OF ROUTINES IN FUNCTIONAL GROUPINGS 


The following subsection contains a brief description of the individual 
routines which comprise the RAMP program. The basic flow of the program 
is presented in Tp.hle 3-8. The routines are grouped and presented as indi- 
cated below: 

• General flow properties routines 

• Shock calculation routmes 

• Input routines 

• Logic control routines 

• Free molecular routines 

• Output routines 

• Transonic routines 

• Startline routines 

• Boundary and problem limits routines 

• Interpolation and iteration routines 

• Property retrieval routines 

• Chemistry routines 

• Compatibility equation coefficient routines 

• Corner point routines 

• Initialization routines 

• Performance calculation routines 

• Characteristic routines 

• Miscellaneous routines 

3.5.1 General Flow Properties Routines 

Routine Description 

EMOFP This function computes the local Mach number 

as a function of local pressure (static) and local 
entropy. 

EMOFV This function computes the Mach number as a 

function of local velocity. 

GAPPBI This subroutine interpolates for the gas and 

particle properties between two known data 
points. 
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Routine 

POFEM 

POFH 

PPATPT 

RGMOFP 

RGVOFM 

RHOFEM 

TOFEM 

TOFENH 

TOFH 

TOFV 

UOFEM 

UOFV 

VOFEM 


Description 

This function computes static pressure as a 
function of Mach number and entropy and total 
temperature (ideal gas two-phase only). 

This routine utilizes the tabulated data of enthalpy 
and specific heat as functions of temperature for 
each species of a finite rate chemistry case to cal- 
culate pressure, is a function of enthalpy for a real 
gas, in a Prandti-Meyer exx*4insion. 

This routine calculates and stores gas and particle 
dependent variables as a function of the independent 
flow properties. 

This subroutine finds Mach number as a function of 
pressure, O/F ratio (or total enthalpy) and entropy. 

The difference between this routine and EMOFP is 
that in this case the gas properties are not known 
prior to entry. 

This function computes velocity as a function of Mach 
number, entropy and O/F ratio (or total enthalpy). 

The difference between this routine and VOFEM is 
that the gas properties are not known prior to 
entry. 

This function computes the local density as a function 
of Mach number and entropy. 

This function computes the local static temperature 
as a function of Mach number. TOFEM and TOFV 
are quite similar; the difference being if Mach number 
or velocity is the known quantity. 

This function calculates the temperature as a function 
of enthalpy for a finite-rate chemistry case. 

This function calculates the temperature as a function 
of enthalpy for a finite-rate chemistry case during a 
Prandti-Meyer expansion. 

This function computes the local static temperature 
as a function of velocity. TOFV and TOFEM are quite 
similar; the difference being if Mach number or velocity 
is the known variable. 

This function computes the local Mach angle as a 
function of local Mach number. Prior to the calcula- 
tion, a test is made to ensure that the Mach number 
is greater than one. 

This function computes the local Mach angle as a 
function of local velocity. 

This function computes velocity as a function of Mach 
number. 
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3.5,2 Shock Calculation Routines 


Routine 

DELTAF 

ENTROP 

ESHOCK 

NORSCK 

SLPLIN 

SOKINT 

SOKSOL 

TURN 

WEAK 

3.5.3 Input Routines 

Routine 

GASRD 


Description 

This function computes the turning angle through an 
oblique shock wave knowing the shock angle and the 
upstream Mach number. 

This function utilizes the oblique shock relations to 
find the entropy rise across a shock as a function of 
the shock angle and the upstream Mach number. 

This subroutine employs an iterative solution to per- 
form the equilibrium shock calculations for a real or 
ideal gas. The real and ideal gas calculations are 
similar, the difference being that an ideal gas case 
converges on the first iteration 

This routine uses local flow properties to calculate 
properties downstream of a normal shock to obtain 
pitot pressure. This routine is used only for finite- 
rate chemistry, real gas cases. 

This subroutine handles the calculation of the points 
on the slipline. Two points are assigned to every 
slipline. 

This subroutine computes the flow properties at the 
intersection of shock waves of the opposite family. 

This subroutine provides control for a shock point 
solution. 

This subroutine solves for a shock wave which has 
a known turning angle (6). A condition of known 
turning angle exists when the flow is turned through 
a compression corner on a solid boundary. Real gas 
effects are considered in calculating conditions down- 
stream of the shock. 

This subroutine determines the independent variables, 
entropy and velocity, SD, VD, downstream of a weak 
oblique shock. The gas properties upstream of the 
shock are known prior to entry. 


Description 

This subroutine reads in the gas properties. These 
properties may be real or ideal and read in via cards 
or tape. The routine also converts input gas proper- 
ties from MKS units to English (ENG) units if 
necessary. 
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Routine 

GASTAP 


IMPUT 


PARTIN 

PARTPH 


PLUMIN 


Description 

This subroutine reads the real gas properties from 
the thermochemical data tape generated by the modi- 
fied TRAN7Z computer program and writes this same 
data on a flowfield tape for communication with other 
programs. 

This routine reads the input cards or tape for the 
chemistry package. The reaction rate equations, 
rate constants, and atartline species concentrations 
are read in and the appropriate conversions, if any, 
are performed. Tables of enthalpy, entropy and 
specific heats for each species are also input. 

This subroutine reads in gas and particle property 
startline data. Data is read in from cards or tape. 

This subroutine reads and sets up the data table of 
particle temperature versus enthalpy. This routine 
also prints out the particle drag tables as well as the 
temperature versus enthalpy tables. 

This subroutine reads in the input data (input via cards) 
necessary to perform the streamline-normal solution. 
This routine provides control for all input functions by 
selectively calling pertinent input routines and/or the 
transonic solution. 


3.5,4 Logic Control Routines 


Routine 

DRIVER 


MAIN 

MOCSOL 

PHASE 1 


Description 

This subroutine provides the highest order control 
for program execution. The initialization and logic 
subroutines are called from here. Most of the common 
storage needed in the remainder of the program is 
specified in DRIVER, 

This subroutine drives the program. 

This subroutine solves the characteristic equations 
for gas only flow in the region around and downstream 
of an expansion corner. 

This subroutine performs the overall control for the 
entire flowfield solution, selectively calling those 
calculations which are pertinent to the particular 
mesh construction as well as the highest level logic 
routine combining point or limited region solutions 
into an entire field solution. 
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Routine 

PLUMIN 


STRNOR 


TRANS 


Description 

This subroutine reads in the input data (input via 
cards) necessary to perform the streamline /normal 
solution. This routine provides control for all input 
functions by selectively calling pertinent input routines 
and/or the transonic solution. 

This subroutine provides the regional control for the 
streamline/normal solution. It has a lower level of 
logical control than PHASEl being interested only in 
determining the location and flow properties of a 
single new mesh point. 

This subroutine provides overall control for initializing 
the data and reading the namelist data for the Kliegel 
two-phase transonic solution of a supersoni.c gas particle 
startline. 


3.5.5 Free Molecular Routines 


Routine 

Description 

AVERAG 

This subroutine determines the appropriate flow regime 
based on Knud sen number for non -continuum flow and 
sets the appropriate gas total conditions. 

FREEMC 

This subroutine computes flowfield properties in the 
free molecular regime. 

STGMOD 

This subroutine computes the gas thermodynamic 
properties in the transition flow regime. 

WTFLOF 

This function computes the area normal to the flow 
which is bounded by two streamline points. 

Output Routines 


Routine 

Description 

ERRORS 

This subroutine contains print messages for various 
errors which may occur. This is an open ended routine 
in that it can easily be extended to handle more print 
messages . 

IDTAPE 

This subroutine writes the gas properties which were 
input via cards on the flowfield program tape. The 
format used to write them on tape is compatible with 
that used for a real gas. 
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Routine 

Description 

OUT 

This subroutine writes the calculated data for data 
points along with the corresponding title and headings. 

OUTBIN 

This subroutine writes the calculated normal data on 
the binary output tape. This is done for any number 
of data points. 

PAGE 

This subroutine page ejects and writes the header 
comments and page number on each page of the 


printout. 

PLMOUT 

This subroutine prints the data read by PLUMIN. 

RITE 

This subroutine tells the program user (in no un- 
certain terms) that he has made a "fatal" error. 
The next executable statement is a STOP. 


3.5.7 Transonic Routines 


Routine Description 

ABCALC 

CCALC 

DCALC 

FCAijC. 

FIND 1 1 
JAMES 
LEGS 

NEWT A complete description of each of these routines is 

ONED contained in Ref. 7. 

PAR TIL 

PCALC 

PROP 

STRMLN 

TRACE 

TRANS 

WDGI 


3.5.8 Startline Routines 


Routine 

AOASTR 

LIPIN 


Description 

This function finds the Ma.ch number corresponding 
to a given area ratio by one -dimensional theory. 

Real gas effects are considered in this calculation. 

This subroutine calculates information for the starting 
line points when the simplified straight start line option 
is used (i.e,, when ICON(2)/2). 
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Routine 


Description 


MASCON 


SETHTG 


WOFA 


This subroutine calculates the Mach number 
distribution at an area downstream of the throat 
such that total mass flow is conserved. Mass 
flow, calculated at the throat, is used as the 
constant (or comparison. 

This subroutine computes the gas total enthalpy 
for a case when finite -rate chemistry is being 
used and the startline is to be generated by the 
program for gaseous flows only. 

This subroutine computes the weight flow per unit 
area as a function of Mach number. This calcu- 
lation is only used in function AOASTR. 


3.5.9 Boundary and Problem Limit Routines 


Routine 


Description 


BOUND 

FNEWTN 

ITERM 

LAGRNG 

LIMITS 

PRFRBD 


This subroutine finds the radial coordinate and 
flow angle (radians) for a given axial coordinate 
on an upper or lower solid boundary. 

This function solves for the Newtonian impact 
pressure along the plume boundary. The calcula- 
tion is applicable for all free stream velocities 
including quiescent conditions (i.e., M^ = 0). 

T'his function tests each normal lower wall point 
to determine if it is within the predefined problem 
limits. If the point falls outside the limits, the 
case is terminated. 

This subroutine determines the radial location 
and flow angle for solid boundaries which are 
input as tables of R,X and flow angle. 

This subroutine tests the new boundary point to 
determine if it is within the limits of the current 
boundary equation. 

This subroutine calculates the flow properties at 
the intersection of a particle limiting streamline 
and a plume boundary. 
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3.5.10 Interpolation and Iteration Routines 


Routine 


Description 


ALGINT 
DRAG CP 

DRAG MR 

GAPPBI 

ITSUB 

SITER 

TEMTAB 

TKEY 


This routine does a* log interpolation between two 
values of a variable. 

This routine deterniines the drag coefficient 
F (C^/C^ ) as a function of Reynolds number. 

^ ^Stokes 

This subroutine determines the local drag coeffi- 
cient (C /C_ ) as a function of particle 

Stokes 

Reynolds number and particle Mach number. 

This subroutine interpolates for the gas and 
particle properties between two known data 
points . 

This subroutine controls the iterative solution of 
any set of equations which can ultimately be ex- 
pressed as a function of one variable; it can also 
be used to control an integration loop. 

This subroutine computes entropy as a function of 
pressure, total enthalpy and velocity. 

This subroutine will perform a table lookup for 
particle temperature as a function of enthalpy or 
for particle enthalpy as a function of temperature. 

This routine determines the proper index to be 
used in the enthalpy and specific h.;at tables and 
calculates interpolation factors. 


3.5.11 Property Retrieval Routines 


Routine 


Description 


IDM.PFP 

IDMTAB 

IDMXSI 


This function computes the particle storage location 
within the PFPARY array. 

This function computes the gas property storage 
location within the TABB array. 

This function computes Lhe gas interpolation 
parameter storage location within the XSIDIM 
array. 
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Routine 


PFP 

RWU 

SPCTX 

TAB 

XSI 


Description 

This function computes the particle property data 
storage location and retrieves data from the PFPARY 
array. 

This routine- is a MSFC Univac 1108 system routine 
used to read and write from FASTRAN files. 

This routine controls the input and output from a 
FASTRAN file of the chemical species in a finite- 
rate chemistry case. 

This function computes the thermodynamic data 
storage location and retrieves data from the TABB 
array. 

This function computes the storage location for the 
nonlinear interpolation weighting functions required 
for thermodynamic property look-up and retrieves 
data from XSIDIM. 


3,5,12 Chemistry Routines 


Routine 


Description 


CHEM 

FABLE 


THERMO 


THERMl 


This routine evaluates the chemical reaction -rate 
equations to determine the new chemical species 
concentrations . 

This subroutine utilizes real or ideal gas information 
obtained from a master tape or input cards to calcu- 
late properties locally in the flow. The maximum 
size of the array used by FABLE is limited to eight 
gas properties (V, R , y , T^, P^, /X, Pr , C^) at 13 velo- 
city "cuts" for each of two entropy cuts and 10 O/F 
or total enthalpy cuts. 

This subroutine utilizes real or ideal gas information 
obtained from the flowfield tape (or tables) and a local 
O/F ratio (or total enthalpy) to call subroutine FABLE 
to calculate thermodynamic gas properties locally in 
the flow. 

This routine determines the gas thermodynamic 
properties for a finite-rate chemistry case. 
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3.5.13 CompatiblUtjr Equation Coefficient Routines 


Routine 


Description 


COEFEQ 


COEFF3 


NEWENT 

ROTERM 


This subroutine calculates the coefficients Cl and CIJ 
for use in the gas -particle system compatibility equa- 
tion along the gas Mach lines. Cl is the gas total 
enthalpy term and CIJ is the particle contribution to 
the equation. 

This subroutine calculates the new particle properties 
at the point under consideration, and the intersection 
of the particle streamlines through this point with the 
J-line. 

This subroutine calculates the change in entropy and 
gas total enthalpy along a gas streamline for gas 
particle flows. 

This function computes the geometrical factor, 

used in the axisymmetric term of the compatibility 
equation and as an interpolation parameter. 


3,5,14 Corner Point Solution Routines 


Routine 


Description 


EXPCOR 

HYPER 


OVEREX 


PRANDT 


This subroutine calculates the flow properties of 
those field points near an expansion corner. 

Thifi subroutine calculates the balanced pressure a. 
a corner point {i.e., at the intersection of a solid 
boundary and the pressure boundary). The pressure 
balance is determined for either the overexpanded 
or underexpanded case with impact or ambient free- 
stream pressure. 

This subroutine solves for the shock angle at the 
nozzle lip when the flow is over expanded. Pro- 
visions are made to calculate the shock angle for 
an upper or lower lip point. Real gas effects are 
considered in calculating flow properties downstream 
of the shock. 

This subroutine computes the Prandtl -Meyer expansion 
angle for a given boundary angle and divides this angle 
into a series of expansion "rays" (unless the number 
of rays has been specified in the input). The flow 
properties at each angular increment are set and 
stored in the PIIO array. 
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Routine 


Description 


THETPM This subroutine performs a numerical integration to 

calculate properties through a Prandtl-Meyer expansion. 
Either the case of known final velocity or known final 
expansion angle may be handled. 


3.5.15 Initialization Routines 


Routine 


Description 


BLKDAT 

INITP 


SETHTG 


This routine initializes the Kliegel (Ref. 7) and Crowe 
(Ref. 11) gas-particle drag coefficients which are used 
by the code. 

This subroutine initializes the values of various con- 
trol parameters, thereby providing for proper operation 
of the program. These initial values include: 

1. The counter for the upper and lower boundary 
equations, 

2, The counter for the first characteristic line, 

? The initial number of degrees per Prandtl-Meyer 
ray, 

4. Convergence criteria, and 

5. Maximum number of iterations. 

This subroutine computes the gas total enthalpy for 
a case when finite-rate chemistry is being used and 
the startline is to be generated by the program for 
gaseous flows only. 


3.5.16 Performance Calculation Routines 


Routine 


Description 


INTEGR This subroutme calculates the incremental force and 

energy between two adjacent points in the flow field. 

MASSCK This subroutine keeps a running check on the mass 

flow. Mass flow at the starting line is calculated 
and compared with that crossing each normal line 
downstream. 
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Routine Description 

THRUST This subroutine computes the vacuum thrust produced 

by a two-dimensional or axisymmetric nozzle. Addition 
of the thrust at the throat and the integrated pressure 
along the nozzle wall yields the final thrust. 


3.5.17 Characteristic Routines 


Routine 

Description 

BOUND A 

This subroutine finds the radial and axial coordinates 
as well as flow angle at the intersection of a straight 
line with a solid boundary. 

CARCTR 

This subroutine calculates velocity along either a I 
or II characteristic line with a known or assumed 
flow angle. 

MOCSOL 

This subroutine solves the characteristic equations 
for gas only flow in the region around and downstream 
of an expansion corner. 

PHYSOL 

This subroutine computes the intersection of phy*:'cal 
characteristics with a "normal" data liiie. 

i Miscellaneous 

Routines 

Routine 

Description 

CHECK 

This subroutine determines whether or not to add or 
delete streamline points based on user input mesh 
controls. 

DOTPRD 

This function calculates the dot product of two vectors 
and returns the result to the calling routine. 

INRSCT 

This subroutine finds the intersection of two straight 
lines. 

KIKOFF 

This subroutine terminates the use if an error in the 
calculation is encountered. 

MAX TIM 

This subroutine is a Univac 1108 machine language 
routine that checks a user input time (seconds) against 
the remaining CPU time before run termination and 
returns to a specified label in the calling routine. 
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Routine 


Description 


SLDP 

VEMAG 


This subroutine finds the solutions to a set of N 
simultaneous linear equations. 

This function determines the magnitude of a vector. 
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3.6 DETAILED DISCUSSION OF THE INDIVIDUAL ROUTINES 


This subsection contains a detailed description 
of each routine used in the program. 

Described are: 

• Function (if applicable) of each 
routine 

• Calling sequence 

• Common blocks and other routines 
used, and 

• The method used in performing the 
routine functions 

For y^our convenience, the routines are organized 
alphabetically. 


NOTE: The following routines are not included in this section as they com- 
prise the tvo-phaae transonic solution of Kliegel which is incor- 
porated in the RAMP code. A complete description of each of these 
routines is contained in Ref. 7. 


ABCALC 
CCALC 
FCALC 
FIND 11 


JAMES 
LEGS 
NEWT 
ON ED 


PAR TIL 

PCALC 

PROP 

TRACE 

WDGI 
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FUNCTION NAME t ALGINT 
DESCRIPTION 

This routine does a log interpolation between two values of a variabl 

CALLING SEQUENCE 

= ALGINT (H,R1,R2) 

where H is the interpolation factor and R1 and R2 are the values of the 
variables between which the interpolation is being made. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON - None 
UTILITY - None 

METHOD OF SOLUTION 

A = £n (Rl) + H ♦ (In (R2) - jJn Rl) 

ALGINT = 
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FUNCTION NAME ! AOASTR 
DESCRIPTION 

This function finds the Mach number corresponding to a given area 
ratio bjr one -dimensional theory-. Real ga^' effects are considered in this 
calculation^ 

CAliUNG SEQUENCE 

EM - AOASTR (OF, S, AOA, K IWl, K2W2) 

where EM is the Mach number which exists, one- dimensionally, at an area 
ratio of AOA, an entropy S, and at an O/f ratio or total enthalpy, OF, 

UTILITY ROUTINES AND COMMON REFERENCES 

COMMON -None 

ERRORS 

ITSUB 

RGVOFM 

THERMO 

WOFA 

METHOD OF SOLUTION 

The weight flow per unit area at Mach one is evaluated, An initial 
guess for the desired Mach number is made and ITSUB is initialized. An 
iterative solution of the equation FOFEM = AOA - WOFAl/WOFA(EM), 
driving FOFEM to zero, is performed with the aid of ITSUB. 
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Q 

0 

Q 

Q 

0 

0 
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SUBROUfiNE NAME: AVERAG 
DESCRIPTION 

This subroutine determines the appropriate flow regime based on 
Knud sen number for non-continuuih Row and sets the appropriate gas total 
conditions,;;^ ' 

CALLING SEQUENCE 

CALL AVER^RS, J,N,K, ITYPE) 

where IS is the bdse point streamline number on the J data surface, N is 
the streamline p^ the K line for which the flow regime is to be deter- 
mined and ITYPE is a flag which is returned to the calling routine to indicate 
the flow regime. 

ITYPE Flow Regime 

1 Continuum 

2 Vibrationally frozen 

3 Rotationall/ frozen 

4 Translationall/ frozen 

UTILITY ROUTINES AND COMMON REFERENCES 

COMMON/TOTAL/ TOFV 

COMMON/GSV/ RHOFEM 

COMMON/GAPPA/ STGMOD 

COMMON/GASCON/ 

COMMON/CONTRL/ 

COMMON/FREE/ 

COMMON/FSTAG/ 

COMMON/DATAR/ 

COMMON/MOL/ 

COMMON/TEMPER/ 

THERMO 

EMOFV 
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METHOD QF SOIiUTION 

The Average kiiud^ ntunber between the old streamUne base point 
is calculated via the following equation: 

' = ,788539 7 (M^/Rg) ffnTj - jeaT2l/dS 

wher e thCv^i^ the old ( I) and new (2) 

streamline points^ The flow reginie is determined bjr checking the calcula'^ 
ted Knudsen numbei^ against the input Knudsen number criteria fpr vibra- 
tional, rotationalor translational freezing. Once the flow regime has been 
determined the appropriate specific heat ratio (gamma) and total conditions 
are calciflated,^^^^^^^ ; w 
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SUBROUTIISIE NAME; BLKDAT 
DESCRIPTION 

. This poutine initialiaes the Kliegel (Ref, 7) and Crowe (Ref. 11) gas- 
particle drag coefficients which are used by the code, 

CALLING SEQUENCE 


None 



COMMON/DRAGC F/ ; 
COMMON/DRUG/ 
utility - None 


METHOD OF SOLUTION 
Not applicable 
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BIIPRODUCIBILiry OF ^CSB 
original page is poor 


SUBROUTINE NAWE; BOOND 


DESCRIPTION 

This sttbrptitine fiiidp the radial coordinate and flow angle (radians) for 
a given avial coordinate on an upi»er or lower solid 

CALLING SEQUENCE 

CALL BOUND (RyX^ ra 

Where R is the radial coordinate, : X is the known axial co 

is the wall an^gle and ITYPE indicates whether upper or lower boandary 

equations are to be used. ’ 

UTILITY ROUTINES AND COMMON REFERENCES 

gommon/DAtab:/ 

COMMON/ WAFT/ 

._/4\-lagrng_ \ 

METHOD OF SOLUTION 

The common hlock hegion DAT contains boundary equations or Wall 
coordinates necessary to evaluate R and theta* The two types of equations 
used aret ^ 


- a[^ 


b + ex + dx + e 1 


r ss ax^ + bx^ + cx^ + dx + e 


Goniq Type 1 


Polynomial Type 2 


When the upper, or lower- boundary is described by discrete points (R,X, THETA) 
subroutine LAGRNG is called to Interpolate for the R and THETA of the point. 
The input fixed point va^^ a one or a two in the units position 

which selects the upper (2) or lower (1) coefficients or points and control ihfor- 
matiphy lEQNOW contains; the number of the equation to be us ad;. 
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SUBROUTINE NAME; BOUNDA 
DESCRIPTION 

This subroutine finds the radial and axial coordinates as well as flow 
angle at the intersection of a straight line with a solid boundary. 

CALLING SEQUENCE 

CALL BOUNDA (PL, PM, RB,XB,AB,ITYPE, KIWI, K1W2) 

where 

PL(8) is the storage array- for the known boundary- point 

PM(8) is the storage array for the known field point 
where the straight line passes through 

RB and XB are the radial and axial coordinates of the point 
of intersection 

AB is the angle of the solid boundary at the point of 
intersection 

ITYPE denotes the type of combination being considered 


ITYPE 

Type of Straight Line 

Boundary 

■' '5L,U':;: 

normal 

lower 

SZ ■ 

normal 

upper 

61 

II '•characteristic 

lower 

62 

I- char act eri Stic 

upper 

121 


lower 

'122- ■ ■■ 

left '•running shock -wave 

upper 


utility ROUTINES and COMMON REFERENCES 
COMMQN/CQ^ 

COMMON/DATAR/ 

COMMON/TEMPO 1/ 

''^ERROR^ / 

■'INRSCt:'':: 

: vCQNTRL 
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METHOD OF SOLUTION 

Intersection of the straight line from PM and the tangent from PL is 
found first with the aid of subroutine INRSCT. The radial coordinate and 
the flow angle on the boundary at this given axial coordinate of the inter- 
section just found can be calculated from the solid boundary equation by 
using subroutine BOUND. Then, if the boundary is not a straight line, the 
newly found point on the boundary is used to repeat the same process until 
the exact intersection is found. 
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SUBROUTINE NAME; CARCTR 
DESCRIPTION 

This subroutine calculates velocity along either a I or II characteristic 
line with a known or assumed flow angle. 

CALLING SEQUENCE 

CALL CARCTR (LOOKUP. P3I. KIWI, KIW2) 

where 

LOOKUP = 1 for a I characteristic 
= 2 for all characteristic 
P3I(8) is the storage array for the point 
under consideration 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/CONTROL/ 

COMMON /CRITER/ 

COMMON/D ATAR/ 

C OMMON/G ASC ON/ 

C OMMON/SLIPPT/ 

C OMMON/PAR TP2/ 

COMMON/GAPPA/ 

ROTERM 

UOFV 

PPATPT 

THERMO 

COEFEQ 

METHOD OF SOLUTION 

For the first pass of the solution the flow properties, esccept the flow 
angle, at the point under consideration are assumed to be identical to those 
of the upstream point on the same streamline. Equation (3.3) is then used 
to calculate the "updated" velocity. Other properties are calculated accord* 
ing to the new velocity. This routine is used in the iteration for a shock 
point solution. 
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SUBROUTINE NAME; CHECK 
DESCRIPTION 

This subroutine determines whether or not to add or delete streamline 
points based on user input mesh controls. 

CALLING SEQUENCE 

CALL CHECK (I,K,IS, J,IGO,ITOTK,ITOTJ) 

where (I,K) and (IS, J) are the two points the program is checking the mesh 
control constraints against. IGO = -1 for checking deletion and greater than 
zero for inserting points. ITOTK and ITOTJ are the total number of points 
on the J and K normals. 


UTILITY ROUTINES AND COMMON REFERENCES 


common/pointc/ 

COMMON/CHEMXX/ 

COMMON/DAT AR/ 

SPCTX 

COMM ON/G LOB AL/ 

PFP 

COMMON/PARTPl/ 

IDjMPFP 

COMMON/PAR TP2/ 

G/.JPPBI 

COMMON/STEPC/ 



COMMON/CON TRL/ 

COMMON/GAPPA/ 

COMMON/FSTAG/ 

COMMON/DROP/ 

COMMON/CHEMCN/ 

METHOD OF SOLUTION 

See Section 3.5,1 for a description of mesh control parameters. 
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gUBl^C^TlNE NAliAEr -^^^CHEM' - 
DESCRIPTION 

the chemical re^ctibh-j^^ 
minethenewchemlcalspeCiesconceatratlonB.- 

CALl.INd SEQUENCE 

CALL CHEM (DXX, RHO, U, T) 

where DXX is the distance along the gas streatnline from the base point to 
the new point 

vv‘v ■;■ ■;■■: RHO' = gas; 

T = gas temperature 

UTILITl ROUTINES AND COMMON REFERENCES 
COMMON/CRITER/ 

COMMON/RUE/ 

COMMON/CONTRL/ 

COMMON/CHEMCN/ 

COMMON/GASDAT/ 

common/chemxx/ 

C OMMON/CHEMY Y/ 

TKEY 

^ ■' RWU ^ ' 

SLDP 

METHOD OF SOLUTION 

The reaction rate equations for the various chemical reactions are 
solved simultaneously using an implicit finite differencing scheme. 
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SUBROUTINE NAME; COEFEQ 
OESORII^TgON' • 

calculates thd coefficients GI and CIJ for use irji the 
gaS/>l>api;icie system cojx^patibillty equation along the gas Mach lines. Cl 
is the gas total enthalpy term and Cl^ is the particle contribution to the 
equation, ■ 

CALLING SEQUENCE 

CALL COEFEQ (M, Ii»A,IPB, IPC) 

where M is equal to 1 for limiting streamlinesi IPA is the base point number 
for the RRC, IPB is the base point humber of the LRC and IPC is the new point 
number . 

UTILITY ROUTIN ES AND COMMON REFERENCES 

COMMON/SLIPPT/ 

COMMON/DAT AR/ 

COMMON/GAPPA/ 

COMMON/ONTSPT/ 

COMM ON/A VPR OP/ 

COMMON/CONTRL/ ^ 

C OMMON/CHEMXX/ 

COMMON/CHEMCN/ 

UTILITY-None 


METHOD OF SOLUTION 

The following finite difference relations are used to solve for the 
coefficient sj 


COSO 


Cl 


1.2 


1.2 


2 ^i, Z 
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CU 


I, ^ 


NP 




2 '‘I, 2 




+ (V I 2 - 2^ 2 ^ 1, 2 ‘ “i, 2^ slnpj^ 2 






‘^ 1,2 


Ax 


L-L 


^ 1,2 ^ 1,2 2 


For a detailed description of the calculation proc-^ lure, see Volume I, 
Section 3.3. 
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SUBROUTINE NAME; COEFF3 


DESCRIPTION 

This subroutine calculates the new particle properties st the point 
under consideration, and the intersection of the particle streamlines through 
this point with the J>line. 

CALLING SEQUENCE 

CALL COEFF3 (KP, M, VERT, IH, KH, 18, KB, 19. K9, 

17, K7, ITYPE, IPA, IPB, IPC, P3, PG) 


UTILITY ROUTINES AND COMMON REFERENCES 


COMMON/CONTRL/ 

C OMMON/DATAR/ 

COMMON/TOTAL/ 

COMMON/PARTPl/ 

COMMON/GAPPA/ 

COMMON/ONTSPT/ 

COMMON/POINTC/ 

C OMMON/PARSTU/ 

COMMON/CRITER/ 


COMMON/PSEC/ 

COMMON/PSLD/ 

COMMON/XXSH/ 

COMMON /GASCON/ 

COMMON /CPMUK/ 

COMMON/SLIPPT/ 

IDMPFP 

PFP 

INRSCT 

PPATPT 

GAPPBI 


f 

i ‘f 





i 


^ ■ i 


METHOD OF SOLUTION 

For a detailed description of the calculation procedure, see Volume I, 
Section 6.1. 
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FUNCTION NAME; DELTAF 


DESCRIPTION 


Thif function computes the turning angle through an oblique shock 
wave knowing the shock angle and the upstream Mach number. 


CALLING SEQUENCE 


delta = DELTAF (EPS, EM.KIWI, K1W2) 


wh<=^re DELTA, the turning angle is found from the shock angle, EPS, and 
the upstream Mach number, EM. NOTE ; The appropriate values of gas 
properties must be stored in common upon entry to this routine. 


UTILITY ROUTINES AND COMMON REFERENCES 


C OMMON/G ASCQN/ 


UTILITY - None 


METHOD OF SOLUTION 


The oblique shock relationships are used to determine the turning 
angle through an oblique shock wave. 


6 = e “ tan 


^ tan e 
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FUNCTION NAME; DOTPRD 
DESCRIPTION 

This function calculates the dot product of two vectors and returns 
the result to the calling routine. 

CALLING SEQUENCE 

= DOTPRD (VI , V2) 

where VI and V2 are any two vectors. 

UTILITY ROUTINES AND COMMON REFERENCES 
None 

METHOD OF SOLUTION 

Vector VI is dotted into vector V2. The resultant is a scalar returned 
as DOTPRD. 
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FUNCTION NAME; DRAGCP 
DESCRIPTION 

This routine dcitermines the drag coeflicieht F (CU/Ck .) as a 

^ :^:.Stoke8;/;-- 

function of Reynolds number. ^ . 

CALLING SEQUENCE 

- DRAGCP (RE) ^ V. ; V. 

where ^ ^ 

RE is the particle Reynolds number. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/DRAGCF/ 

UTILITY -None 

METHOD OF SOLUTION 

Cn/^D_ . is tabulated as a function of particle Reynolds number 
Stokes 

and a linear interpolation is performed based on Reynolds number to obtain 
CD/CDg^^j^^g. This tabulation is that of Kliegel (Ref. 7), 
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: SUBROUTINE NAME; DRIVER; :: 

.:..: ;pESCRIPTIdN \ .... .. 

DRIVER provides the Highest order control progr^ execution. 
The initialization and logic subroutines are caUed froni herei^^^^^^M the 
■ common ‘ storag o needed in the %emuuider. ol the ; prog ram specified her e v 

CALLING SEQUENCE . 

' /CALlii' DRiyEil'^'^ • 

VWhere K is n control constant indicating whether or not error b exist in the 
execution of the program. (R = 1 for a detected error^ lC a^ Q^ 

KIWI and K1W2 are flags which have various uses in the code, 

UTILITY R 3UTINES AND COMMON REFERENCES 

COMMON/AUX/ COMMON/TPEH/ 

. COMMON/CONTRL/ COMMON/WAFT/ 

COMMON/CRITER/ COMMON/NSF/ 

CphfMON/DRAG^^^^^^ COMMON/XSICOM/ 

COMMON/CUTFO/ COMMON /GAPPA/ 

COMMON/XXSH/ COMMON/GRINT/ 

COMMON/FREE/ COMMON/TFLAG/ 

COMMON/FORCE/ GOMMQN/TEMPER/ 

COMMON /GASCON/ COMMON /ON TSPT/ 

COMMON/HEAD/ COMMON/WRITPT/ 

COMMON/SIGNAL/ COMMON/PSLD/ 

COMM ON /input/ COMMON/CPMUK/ 

COMMCN/MASSC/ common /MOL/ 

common/stepc/ common/fab/ 

common /taprit/ common/wt/ 

COMMON/PARTPl/ INITP 

COMMON/PARTP2/ PLUMIN 

common/gasdat/ phase I 

METHOD of SOLUTION; Not applicable. 
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irxmCTlON NAMEt EMOIfP 


V : ^ - DESCRIPTION 

Thin routine computes the local Mach number as a ftmction ol local 
■.^rh'ssure-'istaticV'®**'^ local 'entropy. . fV''/-:;-'.'';-'' 

\ ■ ■ feALUNd SEQUENGE^^ -V 

'EM s'-EMOFP (P, S,KlTVl,KiW2)’. 

i the resultant Mach number found from the pressure, P, and ^ \ 

entropy, S. NOTE ; The appropriate values of the gas properties haust be 
^ common upon entry to this routine. 

. utility routines and common references 

C OMMON/TEMPBR/ ■ 

COMMON /OASCON/ 

UTILITY— Nime ' ■■'■:■• 

METHOD OF SOLUTlOl^ . , 

Thermally perfect gas relationships are used to find the Mach number 



0 

0 

Q 

0 

D 
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0 

Q 

0 
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0 




FtTNCTION NAME! EMOFV 
DESCRIPTION 

This routine finds Mach number as a function of local velocity, 

CALLING SEQUENCE 

is the local number found as a function of the local velocity, V 

NOTE! The appropropriate values of the gas properties must be stored in 
commbn upon entry to this routine. 

UTILITY routines AND COMMON REFERENCES 
COMMdN/GASCON/ 

■ TOF-V:'-,' : ■ ■■■■■'' 

METHOD OF SOLUTION 

Ther^ perfect gas relationships are used to find the Mach number. 
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FUNCTION NAME; ENTROP 


DESCRIPTION 

This routine utilizes the oblique shock relations to find the entropy 
rise across a shock as a function of the shock angle and the upstream 
Mach number. 

CALLING SEQUENCE 

SD = ENTROP (EPS, EMU, KIWI, K1W2) 

where SD is the entropy rise across the shock and is a function of the shock 
angle, EPS, and the upstream Mach number, EMU, NOTE; The appropriate 
values of the gas properties must be stored in common upon entry to this 
routine. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/GASCa'^/ 

UTILITY “None 


METHOD OF SOLUTION 

The oblique shock relations are employed to find the entropy rise 
across the shock. 


ds = 


y-1 


fn 
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SUBROUTINE NAME; ERRORS 


DESCRIPTION 

ERRORS contains print messages for various errors which ma/ occur. 
This is an open ended routine in that it can easily be extended to handle more 
print messages. 

CALLING SEQUENCE 

CALL ERRORS (I, KIWI, K1W2) 
where I selects the message to be printed. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON /CON TRL/ 

UTILITY - None 

METHOD OF SOLUTION 
Not applicable. 
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SUBROUTINE NAME; ESHOCK 


DESCRIPTION 

This subroutine emplo/s an iterative solution to perform the equili- 
brium shock calculations for a real or ideal gas. The real and ideal gas 
calculations are similar, the difference being that an ideal gas case con- 
verges on the first iteration. 

CALLING SEQUENCE 

CALL ESHOCK (OF, SI, VI, EP.DELTA. S2, V2,K2W, KIW) 

where the input properties are, OF, the upstream O/F ratio or total enthalpy, 
SI, VI, the upstream entropy and velocity and, EP, the shock angle. The 
subroutine returns with DELTA, the turning angle and S2, V2, the downstream 
entropy and velocity. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/CONTRL/ 

COMMON/GASCON/ 

EMOFV 

THERMO 

POFEM 

DELTAF 

ENTROP 

RHOFEM 

WEAK 

METHOD OF SOLUTION 

The continuity equation coupled with the equations for conservation of 
normal and tangential momentum are solved in an iterative manner utilizing 
thermochemical property data to satisfy the conservation of energy equation. 
This set of four equations is expressed in terms of the four unknown quantities; 

c = shock angle 

6 = turning angle 

S 2 = entropy downstream of shock 

V 2 = velocity downstream of shock 
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SUBROUTINE NAMEj EXPCOR 


DESCRIPTION 

EXPCOR calculates the flow properties of those field points near an 
expansion corner. 

CALLING SEQUENCE 


CALL EXPCOR (NPM, J, K, ITOT J, ITOTK, IPNT, K2W, KIW) 


where 


NPM a 
J = 
K a 
ITOTJ a 

ITOTK a 


IPNT 


number of Prandtl>Meyer expansion rays 
emanating from the expansion corner 

known normal line upstream of the expansion 
corner 

the normal line under consideration downstream 
of the expansion corner 

adjusted total number of points on the J»line, 
not Including the Prandtl -Meyer expansion 
points NPM 

number of points on K-line before the Prandtl - 
Meyer expansion points are added; returns to 
the calling routine with the total •Mtr.iber of points 
on K-line including Prandtl -Meyer expansion points 

indicates if an upper {=2) or lower (=1) boundary 
is being considered. 


UTILITY ROUTINES AND COMMON REFERENCES 


C OMM ON/CHEMXX/ 

C OMMON/G LOB Al/ 

COMMON /CON TR L/ 

COMMON/DATAR/ 

COMMON/INPUT/ 

COMMON/STEPC/ 

COMMON/AUX/ 


COMMON /FSTAG/ 

COMMON/GAPPA/ 

INRSCT 

MOCSOL 

OUT 

SPCTX 

PPATPT 
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METHOD OF SOLUTION 

Flow properties at the expansion corner points are known (from 
PRANDT). Calculation starts from one of the corner points which have 
zero turning angle and proceedB toward the point with an increasing turning 
angle. Subroutine MOCSOL is used to solve for the flow properties of the 
intersection of the chai< act eristic lines from two known points. The prop- 
erties of the intersection of the normal from the known point on the new 
line (K-linet normal to the streamlines), with the characteristic of the 
corresponding point at the corner, are then interpolated. This pn.nt is then 
used along with, another point at the expansion corner to find {mother new 
point, and so forth. The last 6f the expansion corner points is used twice 
in the calculation to find two points on the new normal — one on the char- 
acteristic line, the other on the streamline. 

A weak shock is then initialized at the point on this last characteristic 
line and a mesh point is inserted between this point and the point on the last 
expansion ray which is a streamline rather than a characteristic line. 

For a detailed description of the calculation procedure, see Volume I, 
Section 6.9. 
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SUBROUTINE NAME; FABLE 


DESCRIPTION 

ThlB subroutine utilizes real or ideal gas information obtained from a 
master tape or input cards to calculate properties locally In the flow. The 
maximum size of the array used by FABLE is limited to eight gas properties 
(V, R, y,T^, p,Pr,Cp) at 13 velocity ’‘cuts'* for each of two entropy cuts 
and 10 O/F or total enthalpy cuts. 


CALLING SEQUENCE 


CALL TABLE (SS, VV, IF) 


where SS is the local entropy, IF is the O/F or enthalpy table of Interest 
and yv is the local velocity at the point of interest. 

UTILITY ROUTINES AND COMMON REFERENCES 


COMMON/XSICOM/ 

CpMMON/CONTRL/ 

COMMON/GASCON/ 

COMMON/FAB/ 

COMMON/GRINT/ 

COMMCW/TEMPER/ 

COMMON/CPMUK/ 

COMMON/PAR TFP/ 


COMMON/GASDAT/ 

COMMON/MOL/ 

COMMON/FI LIT/ 

TOFV 

POFEM 

EMOFV 

XSI 

TAB 


METHOD OF SOLUTION 

The routine is entered with an O/F or enthalpy table, IF, the local 
entropy, SS, and velocity, VV. A test is then made to determine if the gas 
is real or ideal. If the test indicates an ideal gas, the local properties are 
set to those stored in the TABB common array. If the test indicates real 
gas, a double interpolation scheme is utilized to locate gas properties be- 
tween tabulated values of velocity and entropy. In the case of an entry 
beyond the range uf the tables, an ideal gas extrapolation frotxx the last 
table value is made to determine the gas properties. 


3-155 


LOCKHEED -HUNTSVILLE RESEARCH A ENGINEERING CENTER 


FUNCTION NAMEt FNEWTN 




DESC^PTION 

This function solves for the Newtonian Impact pressure along the 
plume boundary. The calculation Is applicable for all free stream velo- 
cities Including quiescent conditions (l.e., s 0), 

CALLING SEQUENCE 

= FNEWTN (THETAS, X.ITYPEl, KIWI, K1W2) 

where Is the hypersonic Newtonian Impact pressure at the plume bound- 
ary, THETAS is the local flow angle at the boundary, X is the axial coordinate 
of the boundary point, and ITYPE indicates If an upper (^2) or lower (=1) boun- 
dary is being considered, 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/DATAR/ 

UTILITY - None 

METHOD OF SOLUTION 

The common block region WALLCO contains the necessary informa- 
tion to evaluate the freestream gas properties at the plume boundary point. 
The impact pressure is then calculated using the following equation 

P = (1 + eX) |l + - 9„)j 
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SUBROUTINE NAME; FREEMC 
DESCRIPTION 

This subroutine computes flowfietd properties in the free molecular 
regime. 

CALLING SEQUENCE 

CALL FREEMC (II. Jl, K 1, ITOT, lOO, lOUT, IMOD) 


where II is the point number for the first free molecular point on a normal, 
Jl is the old data surface, K1 is the new data surface, ITOT is the total 
number of points on the line, lOO is the line number for which a complete 
line is to be printed, lOUT is the total number of lines to skip between com-* 
plete printout and IMOD is the number of points to shift on the old data sur- 
face to locate each base point streamline. 


UTILITY ROUTINES AND COMMON REFERENCES 


COMMON /CON TRL/ 
C OMMON/DAT AR/ 
COMMON/PARTPl/ 
C OMMON/PARTP2/ 

common/free/ 

C OMMON/G ASCON/ 

COMMON/FSTAG/ 

COMMON/CUTFO/ 

COMMON/STEPC/ 

COMMON/CRITER/ 


common/global/ 

BOUND 

ITERM 

INRSCT 

WTFLOF 

IDMPFP 

PFP 

OUT 

OUTBIN 


METHOD OF SOLUTION 

Once it has been determined that a point is free molecular all successive 
calculations of the particular streamline point are made via FREEMC. The 
point properties are determined assuming that temperature, gas velocity, flow 
angle, gas constant and specific heat ratio (y) are constant along a streamline. 
The gas density is determined from a source flow calculation (i.e., conservation 
of mass between streamlines). 
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Pi u. A, 

^ “2 •'^2 

where subscript 1 is the old data surface properties and subscript 2 is the 
new data surface properties. The pressure at the new point is then deter- 
mined from the equation of state. 
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SUBROUTINE NAME; GAPPBI 
DESCRIPTION 

This subroutine interpolates for the gas and particle properties be- 
tween two known data points. 


CALLING SEQUENCE 

CALL GAPPBI as, JU,I9,KU, JB, M, ISKIPG, PG, FACTOR, Ml) 


where 18 is the base point number, JU is the base point line number, 19 is 
the second point number, KU is the second point line number, JP is the 
temporary location in the IPFP array to store the interpolated data, M is 
the number of particles present, ISKIPG is a flag used to determine what 
arrays to use to do the interpolation, PG is the array in which the inter- 
polated point properties are stored, FACTOR is the interpolation factor, 
and Ml = 0 gas only, Ml = 1 particles present. 

UTILITY ROUTINES AND COMMON REFERENCES 

COMMON/TFLAG/ 

COMMON/DR AGC F/ 

common/da tar/ 

COMMON/PCTC/ 

COMMON/PARTPI/ 

COMMON/VISEX/ 

C OMM ON /PAR TP2/ 

ALGINT 

C OMMON/G APPA/ 

PFP 

COMMON/GASCON/ 

THERMO 

C ommon/poin TC / 

UOFV 

C OMM ON/CPMUK/ 

TOFV 

C OMMON/CON TR L/ 

EMOFV 

COMMON/FSTAG/ 

POFEM 

COMMON/TEMPER/ 

TEMTAB 

C ommon/criter/ 

DRAGMR 

COMMON/PS LD/ 

DRAGCP 

COMMON/XXSH/ 
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M ETHOD OF SOLUTION 


The routine performs a linear interpolation between the properties 
of two known points and stores the results in temporary arrays which are 
used in other parts of the program during the calculation. ISKIPG is a flag 
which tells GAPPBI which arrays to use for the interpolation and whether 
or not to interpolate on particle properties. 
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SUBROUTINE NAME; GASRD 
DESCRIPTION 

This subroutine reads in the gas properties. These properties may 
be real or ideal and read in via cards or tape. The routine also converts 
input gas properties from MKS units to English (ENG) units if necessary. 

CALUNG SEQUENCE 

CALL GASRD (IPAR) 

where I'^AR is a 1 for two>phase flow and a zero for gas-only flow. 

UTILITY ROUTINES AND COMMON REFERENCES 
C OMMON/XSIC OM/ 

COMMON/CONTRL/ 

COMMQN/INTCR/ 

COMMON /GASCON/ 

C OMM ON /G ASD AT/ 

COMMON/MOI/ 

COMMON/FSTAG/ 

XSI 

GASTAP 
IDMXSI 
ID TAPE 
IDMTAB 
TAB 



METHOD OF SOLUTION 

The gas name, ALPHA(I), type units, number of O/F tables zuid number 
of entropy cuts are read in from an input card. If the gas properties are on 
cards, this subroutine reads the cards. If the gas properties are on tape, 
control of the reading of properties is given to GASTAP. In either case, the 
properties are converted from MKS to English (ENG) units by this sub- 
routine if necessary. 
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SUBROUTINE NAME: GASTAP 
DESCRIPTION 

GASTAP reads the real gas properties from the thermochemical data 
tape generated by the modified TRAN72 computer program and writes this 
same data oh a flowfield tape for communication with other programs. 


CALLING -iEQUENCE 


CALL GASTAP 


UTILITY ROUTINES AND COMMON REFERENCES 


COMMON/GASDAT/ 
C OMM ON/CON TR L/ 
COMMON/DATAR/ 
COMMON/HEAD/ 
COMMON/PARTP2 / 
C OMM ON/CHEM CN/ 
COMMON/PCTC/ 


COMMON/XXSH/ 

COMMQN/BPRESW/ 

COMMON/TAPRIT/ 

C OMMON/SIGMB/ 

IDMTAB 

ERRORS 

IMPUT 


METHOD OF SOLUTION 

The gas name, ALPHA(I), specified on the input data is compared 


with available cases on the TRAN72 thermochemical data tape until a match 


is found. This particular case is then read, stored in core, arranged in a 
form such that automatic transmission of data to other programs is possible, 
and then written on the RAMP flowfield tape. 
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SUBROUTINE NAME! HYPER 
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DESCRIPTION 

This subroutine calculates the balanced pressure at a corner point 
(i.e., at the intersection o£ a solid boundary and the pressure boundary). 

The pressure balance is determined for either the overexpanded or under* 
expanded case with impact or ambient freestream pressure. 

CALLING SEQUENCE 

CALL HYPER (PB, I, K, ITYPE1,K1W1, K1W2) 

where PB is the boundary pressure, I,K locates the boundary point, and 
ITYPEl indicates if an upper (=2) or lower (=1) boundary is being considered. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/CONTRL/ 

COMMON/DATAR/ 

COMMON/PCTC/ 

COM>/-ON/FSTAG/ 

THERMO 
POFEM 
EMOFV 

METHOD OF SOLUTION 

The boundary pressure (may be Impact or ambient) is compared to 
the static pressure at the corner point. Depending on whether the com- 
parison indicates the flow is overexpanded or under expanded, a branch is 
made to OVEREX or THETPM. In either of these routines an iterative 
process balances the boundary pressure with the flowfield pressure at the 
boundary. 


FNEWTN 

OVEREX 

ITSUB 

THETPM 

TOFH 

ERRORS 
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FUNCTION NAME ; IDMPFP 
DESCRIPTION 

This function computes the particle storage location within the PFPARY 
array. 

CALLING SEQUENCE 

= IDMPFP {I, J,K,L) 

where I, J, K, L are indices used to determine the storage location. 

UTILITY ROUTINES AND COMMON REFERENCES 
C OMMON/PARTP 1/ 

COMMON/PARTP2/ 

COMMON/PARTP3/ 

RWU 

METHOD OF SOLUTION 

The particle storage location is computed using the following relation 


IDMPFP = I + 5 * (J-1 + 10 * (K-1 + 100 * (L-1))) 


3-164 


LOCKHEED -HUNTSVILLE RESEARCH & ENGINEERING CENTER 


FUNCTION NAME; IDMTAB 
DESCRIPTION 

This function computes the gas property storage location within the 
TABB array. 

CALLING SEQUENCE 

= IDMTAB (I, J,K,L) 

where I, J, K, L are indices used to determine the storage location. 

UTILITY ROUTINES AND COMMON REFERENCES 
None 

METHOD OF SOLUTION 

The gas property storage location, is computed using the following 
relation 

IDMTAB = I + 10 * (J-1 + 2 * {K-1 + 13 * (L-1))) 
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FUNCTION NAME! IDMXSI 


DESCRIPTION 

This function computes the gas interpolation parameter storage loca> 
tion within the XSIDIM array. 

CALLING SEQUENCE 

= IDMXSI (I, J, K, L) 

where I, JtK, L are indices used to determine the storage location. 

UTILITY ROUTINES AND COMMON REFERENCES 
None 

METHOD OF SOLUTION 

The gas interpolation parameter storage location is computed using 
the following relation 

IDMXSI s I + 10 * (J-1 + 2 * (K-1 + 13 * (L-1))) 
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SUBROUTINE NAME; IDTAPE 
DESCRIPTION 

This subroutine writes the gas properties which were input via cards 
on the flowfield program tape. The format used to write them on tape is 
compatible with that used for a real gas. 

CALLING SEQUENCE 

CALL IDTAPE (UNITS, K IWl, K 1W2) 

where UNITS indicates whether the gas properties are being read in with 
English (ENG) or MKS units. 

UTILITY ROUTINES AND COMMON REFERENCES 

COMMON/XXSH/ COMMON/BPRESW/ 

COMMON/TAPRIT/ COMMON/PARTPZ/ 

COMMON/CON TRL/ COMMON/GASDAT/ 

COMMON /HEAD/ TAB 

METHOD OF SOLUTION 

Gas property data are i ead in from cards. If not already in MKS units, 
the data are converted. These converted data are then written on the flow- 
field tape. 
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SUBROUTINE NAME: IMPUT 


DESCRIPTION 

This routine reads the input cards or tape for the chemistry package. 
The reaction rate equations, rate constants, and startline species concentra- 
tions are read in and the appropriate conversions, if any, are performed. 
Tables of enthalpy, entropy, and specific heats for each species are also 
input. 

CALLING SEQUENCE 

CALL IMPUT (IDATA) 

where IDATA specifies the proper index of the array being input from a 
CEC data tape from which species one ent rat ions are being extracted. 

UTILITY ROUTINES AND COMMON REFERENCES 

common/contrl/ 

COMMON/CHEMCN/ 
common/d AT AR/ 

COMMON/GASDAT/ 

C OMM ON/CHEMXX/ 

C OMM ON/CPMUK/ 

COMMON/VISEX/ 

COMMON/PC TC/ 

COMMON/GASCON/ 

COMMON/VARSL/ 

SPCTX 

METHOD OF SOLUTION 

The routine reads species thermodynamic data aid constructs a Gibbs 
free energy array to replace the entropy array. The reaction rate constant 
data, reactions, and third body data are input and stored. Finally the start- 
line species concentrations are input via cards or tape and converted to 
mole/mass ratios. 
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SUBROUTINE NAME; INITP 


DESCRIPTION 

This subroutine initializes the values of various control parameters, 
thereby providing for proper operation of the program. These initial values 
include; 

1. The counter for the upper and lower boundary equations, 

2. The counter for the first characteristic line, 

3. The initial number of degrees per Prandtl-Meyer ray, 

4. Convergence criteria, and 

5. Maximum, number of Iterations. 

CALLING SEQUENCE 

CALL INITP (K1W1.K1W2) 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/CONTRL/ 

COMMON/CRITER/ 

COMMON/DATAR/ 

COMMON /DISCOM/ 

COMMON/HEAD/ 

COMMQN/STEPC/ 

UTILITY - None 

METHOD OF SOLUTION 
Not applicable. 
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SUBROUTINE NAME; INRSCT 


DESCRIPTION 

INRSCT finds the intersection of two straight lines. 

CALLING SEQUENCE 

CALL INRSCT (Tl, T2, T3,T4,T5, T6, R3, X3, KIWI, K1W2) 

where Tl, T2, T3 and T4, T5, T6 define the equations of the two straight lines 
which intersect at R3,X3. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON - None 
ERRORS 

METHOD OF SOLUTION 

The equations of the straight lines are written 

r = tanT3 (x - T2) + Tl 

and 

X = cotT6 (r - T4) + T5 

These equations are solved for x, but a test on the slopes is made to prevent 
indeterminate forms. If an indeterminate form is possible, the points are 
mapped one onto another, thus precluding the possibility of indeterminancy 
except when the lines are parallel. 
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SUBROUTINE NAME; INTEGR ' ' 

DESCRIPTION 

This subroutiae calculates the incremental lorce and energy between 
two adjacent points in the flow field. 

CALLING SEQUENCE 

CALL INTEGR PELX, DELY, THTBR, R, DA, V, 

RHO, P,X,I,K, FXP, FYP, TRP, FXG, FYG, TRG, 

AX02D, ENU, EG, EP , EM, DW) 

where 

DELX = difference in axial position between the two points 
DELY = difference in radial position between the two points 
THTBR = average flow angle of the two points 
R = average radial position of the two points 
DA s absolute distance between the two points 
V = average gas velocity of the two points 
RHO = average gas density of the two points 
P = average gas pressure of the two points 
X := average axial position of the two points 
1 = point number of the base point 
K = line number of the base point 

FXP = incremental force in axial direction due to the particle 
momentum 

FYP = incremental force in radial direction due to the particle 
momentum 

TRP = incremental torque due to particle momentum 

FXG = incremental force in axial direction due to gas 

FYG = incremental force in radial direction due to gas 

TRG = incremental torque due to gas axial and radial forces 

AX02D = geometric term for axisymmetric or 2-D flow 

ENU - angle the line connecting the two points has referenced 
tc horizontal 

EG = incremental gas energy 
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EP = incremental particle energy 

EM s sum of incremental particle and gas energy (i.e., mixture) 

DW = incremental gas mass flow between the two points. 

UTILITY ROUTINES AND COMMON REFERENCE 
COMMON/CONTR L/ 

COMMON/PARTPl/ 

COMMON/PAR TP2/ 

C OMMON/DATAR/ 

COMMON/FSTAG/ 

COMMON/INTC R/ 

PFP 

VEMAG 

METHOD OF SOLUTION 

This subroutine calculates the mass flow, energy, momentum and thrust 
produced by the i>articles and gas contained in each streamtube bounded by 
two streamline points on a normal. The resulting values are integrated along 
each normal and compared to the initial data surface to determine how well 
the solution is conserving the conservation equations. 
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FUNCTION NAME; ITERM 


DESCRIPTION 

ITERM tests each normal lower wall point to determine if it is within 
the predefined problem limits. If the point falls outside the limits, the case 
is terminated. 

CALLING SEQUENCE 

FUNCTION = ITERM (IP, K, KIWI, K1W2) 
where IP identifies the characteristic point on the new K line, 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/CUTFO/ 

COMMON/DATAR/ 

UTILITY - None 

METHOD OF SOLUTION 

The angular orientation of a line drawn from the upper or lower cutoff 
coordinates to the characteristic point is determined. Comparing this angle 
to the angle of the upper or lower cutoff line determines if the point is inside 
or outside the problem limits. 
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SUBROUTINE NAME; ITSUB 


DESCRIPTION 

This subroutine controls the iterative solution of any set of equations 
which can ultimately be expressed as a function of one variable; it can also 
be used to control an Integration loop. 

CALLING SEQUENCE 

CALL ITSUB {FOFY, Y, SAVE, CONV.NTIMES, KIWI, K1W2) 

where 

FOFY is the function of Y which is driven to zero 
Y is the variable which is iteratively solved for 

SAVE is the program control array, i.e., SAVE(l) is a control counter, 
SAVE{2) is the Y increment 

CONV is the convergence criteria for FOFY 

NTIMES = maximum number of iterations to be performed 

UTILITY ROUTINES AND COMMON REFERENCES 
None 

METHOD OF SOLUTION 

ITSUB modifits Y in the proper direction by the uicrement value 
SAVE(2) until the root has been bracketed. The method of false position is 
then used to modify Y until the solution is reached. Immediately after 
entering ITSUB each time, the function is inspected for convergence. If 
the function has converged, a program control is set, and computer control 
is transferred to the calling routine. 
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SUBROUTINE NAME: KIKOFF 


DESCRIPTION 

This subroutine terminates the use if an error in the calculation is 
encountered. 

CALLING SEQUENCE 

CALL KIKOFF (K1WI,K2W2> 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/CONTRL/ 

UTILITY -None 

METHOD OF SOLUTION 
Not applicable. 
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SUBROUTINE NAME; LAGRNG 


DESCRIPTION 

This subroutine determines the radial location and flow angle for solid 
boundaries which are input as tables of R,X and flow angle. 

CALLING SEQUENCE 

CALL LAGRNG (lER, ID, ARG, R, THETA, ITYPE) 

where 

lER is an error flag, ID is a table location, 

ARG is the axial value for which the radial coordinate, R, 
of the wall and flow angle, THETA, at the wall are 
desired, 

ITYPE indicates if an upper (= 2) or lower {= 1) boundar/ 
is being considered, 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/DATAR/ 

common/contrl/ 

COMMON /WAFT/ 

UTILITY - None 

METHOD OF SOLUTION 

The routine uses the Lagrange interpolation formula to solve for R and 
flow angle as a function of axial position ,X, from a set of tabular points de- 
scribing a solid boundary. The routine uses the three closest points to the 
desired X to solve the interpolation formula. In the vicinity of large nonlinear 
variations in R and flow angle the points should be placed close together. 
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SUBROUTINE NAMEt LIMITS 


DESCRIPTION 

This subroutine tests the new boundary point to determine if It is within 
the limits of the current boundary equation. Depending on the teat, the options 
are; 

1. use the current boundary equation, 

2. advance to the next boundary equation, or 

3. the current equation is the last one specified. 

C ALLING SEQUENCE 

CALL LIMITS (I, K, ITYPE, lOK.KlWl, K1W2) 

where I,K represents the location of the boundary point in the PHO array, 
ITYPE indicates if an upper or lower boundary is being considered, and lOK 
is a control Indicating if option 1, 2 or 3 is to be used. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/CONTRL/ 

C OMM on/d AT AR/ 

BOUND 

METHOD OF SOLUTION 

The radius, RMAX, and boundary angle. THETAMAX, at the limiting 
axial value XMAX is calculated in BOUND. RMAX or XMAX is compared to 
R or X for the point in question. The results of the comparison determine 
which of options 1, 2 or 3 is to be used. 
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SUBROUTINE NAME; LIPIN 


DESCRIPTION 

LIPIN calculates information for the starting line points when the 
simplified straight start line option is used (i.e., when ICON(2)/^Z). 

CALLING SEQUENCE 

CALL LIPIN (COOR,S,INTOT,DELM,KlWl,KlW2) 

where COOR is the starting line information array, S is the entropy level of 
the start line, INTOT is the total number of input points specified (50 Max), 
DELM is Mach number gradient along the startline, and KIWI is a flag which 
determines the type of startline point distribution. 

UTILITY ROUTINES AND COMMON REFERENCES 

common/input/ 

COMMON/CONTRL/ 

COMMON/PC TC/ 

COMMON/FSTAG/ 

COMMON/GASCON/ 

RGVOFM 

UOFV 

THERMO 

METHOD OF SOLUTION 

The startline input data are divided into the specified number of incre- 
ments. Radial gradients in Mach number, X and 6, are calculated. 

KIWI = 0 The startline points are concentrated near the upper 
boundary 

KIWI = 1 The startline points are evenly spaced 

KIWI = 2 The startline points are evenly spaced on a source line 
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SUBROUTINE NAME; MASCON 


DESCRIPTION 

MASCON calculates the Mach number distribution at an area downstream 
of the throat such that total mass flow is conserved. Mass flow, calculated at 
the throat, is used as the constant for comparison. 

CALLING SEQUENCE 

CALL MASCON {F,SE,DELM, KIWI, K1W2) 

where E is the input line array COBLIP, SE is the input line entropy level, 
and DELM is the Mach number gradient along the startline. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/CONTRL/ 

RGVOFM 

ERRORS 

EMOFV 

IT SUB 
RHOFEM 

METHOD OF SOLUTION 

* ^ 

The mass flow rate at the throat, m , is calculated. This m is com- 
pared to that at the input line location for an initial Mach number distribution. 
The Mach number distribution is then perturbed until mass flow is conserved. 
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SUBROUTINE NAME; MASSCK 


DESCRIPTION 

This subroutine keeps a running check on the mass flow. Mass flow at 
the starting line is calculated and compared with that crossing each normal 
line downstream. 


CALLING SEQUENCE 

CALL MASSCK (ILAST, ISTART,K,K1W1,K1W2) 

where ILAST is the last point on the normal line, ISTART is a number of the 
first point on the normal and K represents the normal line under consider- 
ation. 


UTILITY ROUTINES AND COMMON REFERENCES 


COMMON/DATAR/ 
COMMON/M ASSC/ 
COMMON /IN PUT/ 
COMMON/PSLD/ 
COMMON/CONTRL/ 
COMMON/NSF/ 
COMMON/STEPC/ 
COMMON/SIGNAL/ 


COMMON/FORCE/ 
COMMON/WT/ 
COMMON /PAR TP 1/ 
COMMON/PARTP2/ 
COMMON/IN TCR/ 

common/fstag/ 

INTEGR 

PFP 


METHOD OF SOLUTION 

The mass Qow through the startline is calculated and stored. Mass 
flow through lines downstream is calculated and these values compared with 
the Initial value. A percent change in mass flow is printed for each normal 
line. The total mass flow passing under each point on a characteristic line 
is stored so the ).nasB flow can be written on the output tape to permit stream- 
line tracing . 
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SUBROUTINE NAME; MAXTIM 


DESCRIPTION 

This subroutine is a Univac 1108 machine language routine that checks 
a user input time (seconds) against the remaining CPU time before run term- 
ination and returns to a specified label in the calling routine. 

CALLING SEQUENCE 

CALL MAXTIM ($ LABEL, TIME) 

where 

LABEL = the statement number in the calling routine 
where execution is sent if TIME is greater 
than the remaining CPtf time for the run. 

TIME = time in seconds before CPU maximum time 
when the run is to be terminated normally. 

UTILITY ROUTINES AND COMMON BLOCKS 
None 

METHOD OF SOLUTION 

TIME is checked against the remaining CPU time for the particular run. 
If the remaining CPU time is less than TIME then control of progrzim execution 
is returned to statement LABEL in the calling routine. 
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SUBROUTINE NAME; MOCSOL 


DESCRIPTION 

This subroutine solves the characteristic equations for gas only flow in 
the region around and downstream of an expansion corner, 

CALLING SEQUENCE 

CALL MOCSOL (IN, KN, IN 1, KN 1, IN2, KN2, IFLAG, ITYPE, K IWl, K1W2 

where IN,KN identifies the storage location for the new point to be computed, 
IN1,KN1 identifies the right running known point, and IN2.KN2 identifies the 
left running known point. IFLAG is an error Indicator and ITYPE selects the 
type calculation. 

UTILITY ROUTINES AND COMMON REFERENCES 


COMMON/PAR TP 1/ 

COEFF3 

COMM ON /PAR TP2/ 

INRSCT 

COMMON/GAPPA/ 

pofem 

COMMON /ON TSPT/ 

COEFEQ 

COMMON/AVPROP/ 

PPATPT 

COMMON/SLIPPT/ 

PFP 

COMMON /GLOBAL/ 

IDMPFP 

common/fstag/ 

BOUND 

COMMON/FREE/ 

ROTERM 

common/stepc/ 

VOFEM 

common/cpmuk/ 

RGMOFP 

common/pctc/ 

fnewtn 

common/contrl/ 

TOFH 

common/criter/ 

UOFV 

common/datar/ 

newent 

common /GASCON/ 

ERRORS 


SPCTX 
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METHOD OF SOLUTION 

The four characteristic equations are written as a function of five 
variables, R, X, 0, V and S. An additional relationship is obtained bjr assuming 
the entropy, S, varies linearly between known data points. Using these char- 
acteristic equations in finite difference form, the routine solves for a new mesh 
point, knowing two mesh points of an opposite family. 

The solution is begun by setting the average values of properties over 
the step length equal to the known values at tne base points. Subsequent 
passes in the iterative solution result in "updated" average values. The 
iterative solution is continued until the desired convergence on velocity or 
flow angle is reached or until the maximum number of iterations is exceeded. 

MOSCOL is utilized by subroutine EXPCOR to solve the normal line 
immediately downstream of any expansion corner. 
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SUBROUTINE NAME; NEWENT 
DESCRIPTION 

This subroutine calculat<‘ the change in entropy and gas total enthalpy 
along a gas streamline for gas particle flows. 

CALLING SEQUENCE 

CALL NEWENT (NP, ITl, IT2, S3. H3, K, PB) 

where 

NP = number of particles present on streamline 
ITl =! 1 for interior point 
2 for wall point 

IT2 = 1 for interior or lower wall point 

= 2 for upper wall point 

S3 = entropy at new point 

H3 = total eni;halpy at new point 

K = 5 gas only streamline 

7 gas and particles present on streamline 

PB = array containing streamline base point properties 
(upstream) 


UTILITY ROUTINES AND COMMON REFERENCES 

COMMON/CONTRL/ COMMON/CHEMXX/ 

COMMON/CHEMXY/ COMMON/CHEMCN/ 

COMMON /A VPR OP/ COMMON/VISEX/ 

COMMON/GAPPA/ CHEM 

COMMON/SLIPPT/ 


METHOD OF SOLUTION 

The compatibility relations for gas total enthalpy and entropy (Eqs, (3.2), 
and (3. 1) of Table 3-1) are solved at the new streamline point knowing the gas 
and particle properties at the new and base streamline points. For gas only 
flows (and streamlines not crossing a shocl<^ the gas total enthalpy and entropy 
are held constant along a given streatnline. 
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SUBROUTINE NAME: NORSCK 
DESCRIPTION 

This routine uses local flow properties to calculate properties down- 
stream of a normal shock to obtain pitot pressure. This routine is used only 
for finite rate chemistry, real gas cases. 

CALLING SEQUENCE 

CALL NORSCK (VI, PI, EMI, TI, GMI, RI, HI, POSTR) 


where 

VI, PI, . . . , HI are the local values of velocity, pressure, Mach 
number, temperature, gamma, gas constant and 
enthalpy 

POSTR is the pitot pressure, 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/GASCON/ 

COMMON/PCTC/ 

TOFENH 

ITSUB 

METHOD OF SOLUTION 

The downstream conditions are first estimated using ideal gas relations. 
The routine then performs an iteration as foJ^ows: 

1, Calculate downstream static enthalpy from energy equation. 

Z, Iterate in subroutine TOFENH for temperature, gamma and 
gas constant, 

3, Calculate downstream pressure from continuity and equation of state, 

4, Check to see ii resultant pressure satisfies the Rayleigh line equa- 
tion, If not, mcrement the downstream velocity and repeat steps 1 
through 4, 

5, When the iteration is complete, the pitot pressure is determined 
from the downstream conditions. 
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SUBROUTINE NAME; OUT 
DESCRIPTION 

OUT writes the calculated data for data points along with the corre- 
sponding title and headings. 

CALLING SEQUENCE 

CALL OUT (I1,I2,K,K1W1.K1W2) 

where II, 12 refer to the point numbers of the points to be output (any number 
of points may be output at one time. K represents the current normal line 
(takes on the value 1 or 2). 

UTILITY ROUTINES AND COMMON REFERENCES 


COMMON/CON TRL/ 
COMM ON /DAT AR/ 
COMM ON /GASCON/ 
COMMON/HEAD/ 
COMMON/PARTP 1/ 
COMM ON/PAR TP2/ 
COMMON/GAPPA/ 
COMMON/WRITPT/ 
C OMMON/TEMPER/ 
COMMON/FSTAG/ 
COMMON/CRITER/ 

common/total/ 


common/chemcn/ 

COMMON/CHEMXX/ 

COMMON/GASDAT/ 

POFEM 

page 

PFP 

THERMO 

PPATPT 

NORSCK 

VEMAG 

SPCTX 

ESHOCK 


METHOD OF SOLUTION 
Not applicable. 


3-186 


LOCKHEED • HUNTSVILLE RESEARCH & ENGINEERING CENTER 


SUBROUTINE NAME; OUTBIN 


DESCRIPTION 

This subroutine writes the calculated normal data on the binar/ output 
tape. This is done for any number of data points. 

CALLING SEQUENCE 

CALL OUTBIN (11,12, JK, KIWI, K 1W2) 

where 11,12 identifies the range of points to be written on tape (II is first 
point, 12 is last), JK represents the current characteristic line (1 or 2). 

UTILITY ROUTINES AND COMMON REFERENCES 

common/taprit/ 

common/da TAR/ 

COMM ON/F ORC E/ 

COMMON/GAPPA/ 

COMMON/PARTPl/ 

COMMON/PARTP2/ 

COMMON /C ONTR L/ 

COMMON /global/ 

COMMON/AUX/ 

MAXTIM 

PFP 

TEMTAB 

METHOD OF SOLUTION 
Not applicable. 
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SUBROUTINE NAME; OVEREX 


DESCRIPTION 

OVEREX solves for the shock angle at the nozzle Up when the flow is 
over expanded. Provisions are made to calculate the shock angle for an upper 
or lower lip point. Real gas effects are considered in calculating flow prop- 
erties downstream of the shock. 

CALLING SEQUENCE 

CALL OVEREX (PB, I, K, ITYPEl, K1W1.K1W2) 

where PB is the freestream pressure at the boundary; I,K defines the location 
of the lip point in the characteristic data (PHO) array and ITYPEl indicates 
whether an upper (=2) or lower ( = 1) boundary is to be considered. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/DATAR/ 

COMMON/PARTPl/ 

COMMON/PARTP2/ 

EMOFV 

ESHOCK 

THERMO 

POFEM 

ITSUB 

PFP 

UOFV 

IDMPFP 

ERRORS 

METHOD OF SOLUTION 

For the first pass through the solution, an initial shock angle is assumed. 
This shock angle is perturbed in ITSUB and the result used to calculate flow 
properties including static pressure downstream of the shock. The calculated 
static pressure is compared with the boundary pressure to determine if the 
desired convergence has been obtained. If the solution has not converged ITSUB 
is called again and the above procedure is repeated. 
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SUBROUTINE NAME; PAGE 
DESCRIPTION 

This subroutine page ejects and writes the header comments and page 
number on each page of printout. 

CALLING SEQUENCE 

CALL PAGE (LCNT,K1W1,K1W2) 

where LCNT is a counter which monitors the number of lines of printed out- 
put per page. LCNT is reinitialized in PAGE. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/HEAD/ 

COMMON /CONTRL/ 

UTILITY - None 

METHOD OF SOLUTION 

When the maximum number of lines per page (55) have been output, 
PAGE is called to page eject. It then prints the identifying information and 
the page number, increments the page number and reinitializes the line 
counter. 
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SUBROUTINE NAME; PARTIN 


DESCRIPTION 

This subroutine reads in gas and particle property startline dateu Data 
is read in from cards or tape. 

CALLING SEQUENCE 


CALL PARTIN (NSETS, NTAPE) 


where 

NSETS is the number of startline points where particles 
are present 

NTAPE is the FORTRAN unit to read the startline data 
from (=7 for cards) 


UTILITY ROUTINES AND COMMON REFERENCES 


COMMON/PARTPl/ 
COMM ON/PAR TP2/ 
COMMON/INPUT/ 
COMMON/CONTRL/ 
COMMON/MASSC/ 

common/wt/ 

COMM ON/ PS LD/ 
COMM on/on TSPT/ 
COMM ON /GASCON/ 
COMMON /TEMPER/ 
COMMON/NSF/ 
COMMON/LIPCOM/ 


COMMON/PCTC/ 

COMMON/GASDAT/ 

COMMON/VISEX/ 

COMMON/FSTAG/ 

RGVOFM 

UOFEM 

TOFEM 

POFEM 

SPCTX 

THERMO 

IDMPFP 

PFP 


METHOD OF SOLUTION 

Tne gas startline points are read starting with the axis point and input 
up to the boundary, while the particle startline data is input starting with the 
last limiting streamline or last gas startline point and input down to the axis. 
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SUBROUTINE NAME; PARTPH 


DESCRIPTION 

This subroutine reads and sets up the data table of particle temperature 
versus enthalp/. This routine also prints out the particle drag tables as well 
as the temperature versus enthalpy tables, 

CALLING SEQUENCE 

CALL PAKTPH (IPFTOC, LCT, NGS) 

where 

IPFTOC = zero for two phase case 
= 10000 for gas only case 

LCT = line counter for printout purposes 
NGS is a dummy variable 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/GASTPE/ 

COMMON/CONTRL/ 

COMMON/TPEH/ 

COMMON/GASDAT/ 

COMMON/DRAGCF/ 

COMMON/PARTP2/ 

COMMON/DATAR/ 

COMMON/TFLAG/ 

PAGE 

METHOD OF SOLUTION 
Not applicable. 
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FUNCTION NAME; PFP 


DESCRIPTION 

This function computes the particle property data storage location and 
retrieves data from the PFP ARY array, 

CALLING SEQUENCE 

= PFP(I, J,K, L) 


where 

I, J, K, L are indices used to determine the storage location. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/PARTPl/ 

COMMON/PARTP2/ 

COMMON/PARTP3/ 

RWU 

METHOD OF SOLUTION 

The particle property data storage location is computed using the 
following relation 

IX = I + 5 * (J-1 + 10 * (K-1 + 100 * {L-1})) 
and retrieved using the relation 

PFP = PFPARY(IX). 
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SUBROUTINE NAME; PHASEl 
DESCRIPTION 


This subroutine provides the necessary controlling logic for the com- 
plete flowfield calculation. Proper subroutines are called to handle different 
kinds of calculation. 

CALLING SEQUENCE 

Call PHASEl (IFINIS,K2W1,K2W2) 
where IFINIS is set to zero. 


UTILITY ROUTINES AND COMMON REFERENCES 


COMMON/CONTRL/ 

OUTBIN 

COMMON /DR OP/ 

SPCTX 

COMMON/GASCON/ 

PPATPT 

COMMON/NSF/ 

LIMITS 

COMMON/DATAR/ 

BOUND 

C OMMON/GAPPA/ 

B OUNDA 

COMMON/INPUT/ 

PRANDT 

C OMMON/G LOB AL/ 

UOFV 

COMMON/STEPC/ 

ITERM 

COMMON/PARTP 1/ 

TURN 

COMMON/TEMPOl/ 

HYPER 

C0MM0N/TEMP02/ 

POFEM 

COMMON/TOTAL/ 

EMOFV 

COMMON/OVERLA/ 

COMMON/CRITER/ 

RGMOFP 

VOFEM 

COMMON/INTEU/ 

THETPM 

COMMON/PSEC/ 

TOFEM 

C0MM0N/TEMP03/ 

SOKSOL 

COMMON/FREE/ 

STRNOR 

COMMON/XXSH/ 

ERRORS 

COMMON /BPRESW/ 

MAXTIM 

COMMON/PCTC/ 

MASSCK 

COMMON/CHEMXX/ 

CHECK 

COMMON/ VISEX/ 

PFP 

COMMON/EXPER/ 

IDMPFP 

COMMON/GASDAT/ 

INRSCT 

COMMON/FSTAG/ 

SOKINT 

OUT 

FREEMC 

THRUST 

THERMO 

PRFRBD 

EXPCOR 
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METHOD OF SOLUTION 


This subroutine makes most of the tests to determine what kind of 
calculation should be carried out for the point under consideration. The 
point may be a regular field point, solid or free boundary point, left- or 
right-running shock points, incident shock points or reflected shock points 
on the solid boundary, attached shock points on the solid boundary, shock 
wave intersection points (opposite family), slipline points, incident shock 
points and expansion corner points at the free boundary, expansion corner 
points at solid boundary, etc. 
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SUBROUTINE NAME: PHYSOL 


DESCRIPTION 


This subroutine finds the reference properties on the characteristic 
line so that the compatibility equations can be used to calculate the flow 
velocity and angle of a point downstream of the known reference normal 
line (or surface). 


CALLING SEQUENCE 

CALL PHYSOL (PRET, IS, JS, IN, KN, IDIR, IFLAG, KIWI, K1W2, PIS, 
PIN, PM, PMl, IPM, IPMl, KPM, JAG, P, ARGN, ISLIP, KSLIP, IFIX, 1141, 
IQUAD, H, SAVE, DP) 


where 


PRET(8) 
(IS, JS) 

(IN, !''N) 

IDIR 

IFLAG 

PIS (8) 

PIN (8) 
PM(8) 
PMI(8) 
IPM, IPMl 


is the storage array of reference properties found 

is tho point on the reference normal line (J-line), 
normally on the same streamline as the one under 
consideration 

is c known point just below the point under considera- 
tioi on the new normal line (K-line) 

indicates if a I -characteristic (=+l) or a Il-characteristic 
(=-l) is being considered 

is a control indicator to return the proper message to 
the calling subroutine in ordei that a proper measure 
can be taken 

array containing the flow properties of the streamline 
base point 

array containing the new Qow properties of the stream- 
line point 

array containing the flow properties of point IPM which 
brackets the characteristic intersection 

array containing the flow properties of point IPMl which 
brackets the characteristic intersection 

the point numbers of the two adjacent points on the old 
data surface which brackets the characteristic inter- 
section 
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KPM 

if the characteristic line intersects a boundary, shock 
or slipline KPM is the point number on the new data 
surface which bounds the intersection 

JAG 

the point immediately above or below the streamline 
base point. This point is used to detect the presence 
of a slipline. 

P(8) 

array in which the characteristic intersection flow 
properties are stored 

ARGN 

the angle of the normal 

IS LIP 

flag which indicates if not enough data is known to 
obtain the characteristic intersection 

KSLIP 

if KSLIP is a 1 the characteristic has intersected a 
slipline 

IFIX 

index used within PHYSOL which Indicates if the two 
points which bracket the characteristic intersection 
have been found 

1141 

flag which indicates if the characteristic intersection 
is below the first point or above the last point on the 
old data surface 

IQUAD 

1 - interpolation is being made on R 

2 - interpolation is being made on X 

H 

interpolation factor between point IPM and IPMl 
necessary to obtain the characteristic intersection 

SAVE(8) 

array which is used to retain data from previous 
intersections 

DP{8) 

array which contains the flow property differences 
between points IPM and IPMl. 





r L 






UTILITY ROUTINES AND COMMON REFERENCES 


COMMON/POINTC/ 

COMMON/GASCON/ 

COMMON/TEMPER/ 

COMMON/FSTAG/ 

COMMON/CHEMXX/ 

COMMON/CONTRL/ 

COMMON/DATAR/ 

COMMON /SLIPPT/ 

C0MM0N/TEMP02/ 

COMMON/PARTPl/ 


COMMON/PARTP2/ \ i 

COMMON/GAPPA/ ‘ ■ 

COMMON/DROP/ 

COMMON/CRITER/ I i 

B OUND 1 i 

THERMO 

INRSCT 7j 

ITSUB I f 

PFP 
UOFV 

G APPBI 3 i 

PPATPT ii 
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METHOD OF SOLUTION 
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The characteristic Tne is drawn from the point »ander consideration to 
intersect the known upstream reference normal line. The reference prop- 
erties of this intersection are interpolated from the two known points on the 
reference normal line. Subroutine ITSUB and the average quantities are used 
to obtain a. better approximation of the reference properties. 

If the reference properties are not readily available, IFLAG is set to 
Z, and the reference properties are then assumed to enable the calculation 
to be continued. Normally, the calculation of this point is repeated after- 
ward to obtain the correct reference properties for the calculation of the 
new point under consideration. 
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SUBROUTINE NAME; PHYZOL 
DESCRIPTION 


This subroutine handles the downstream shock points and wall point 
near the corner of a reflected or an attached shock wave. 


CALLING SEQUENCE 


CALL PHYZOL (P5I, P6I, P4I. KANT, IS, JS, IN, KN, ANGLE, 
IFLAG, ITYPE, KIWI, K1W2) 


where 

P5I(8) is the storage array of the shock downstream point near 

the corner where the shock reflected or attached 

P6I(3) is the storage array of the shock downstream point at 

the point where shock reflected or attached 

P4I(8) is the storage array of the intersection of the wall with 

the average normal drawn from point P5I 

KANT 1. first time calculation 

2. iterative calculation 


(IS, JS) denotes the storage location of point P6I 

(IN, KN) denotes the storage location of the shock upstream point 

opposite of point P51 

ANGLE is the angle between the shock wave and the axial 
coordinate 


IFLAG is a control indicator for sending in and out the proper 

information in order that corresponding measures can 
be taken 


ITYPE indicates if a strong or weak shock is being considered 

and where the shock is reflected or attached 

strong shock 51 (lower wall) 52 (upper wall) 
weak shock 151 (lower wall) 152 (upper wall) 


UTILITY ROUTINES AND COMMON REFERENCES 


C O MM ON /DA TAR/ 

COMMON/PHISOL/ 

COMMON/SLIPPT/ 

COMMON/TEMPOl/ 

COMMON/CONTRL/ 


B OUNDA 

CARCTR 

ERRORS 

INRSCT 

THERMO 

UOFV 
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METHOD OF SOLUTION 


The shock points at the wall (where the shock reflected or attached) 
are known. The shock upstream point slightly downstream of the shock 
attachment point Is also calculated, though the results may not be the final 
ones. The oblique shock relations are used to calculate the downstream 
point P5I. Through this point an average normal line is drawn to intersect 
the wall (BOUNDA) . The flow properties of this point P4I are initially 
assumed to be the same as those of point P6I. Point P4I is treated as a 
wall point. The velocity of point P5I is then recalculated with the shock 
downstream properties; this newly calculated velocity is then compared 
with the velocity calculated with the oblique shock relations. Shock strength 
is adjusted until the velocity of point P5I calculated by both methods converge 
to the same value. The final results of the shock points, as well as the wall 
point downstream of the attached or reflected shock, are then returned to the 
calling subroutine. See Volume I, Section 6.8 for the details of calculation. 


3-199 


LOCKHEED . HUNTSVtLLE RESEARCH & ENGINEERING CENTER 


SUBROUTINE NAME; PLMOUT 


DESCRIPTION 

PLMOUT prints the data read by PLUMIN. 

CALLING SEQUENCE 

CALL PLMOUT (KP, LCNT, K 1 W 1, K 1W2) 

where KP is a control parameter set in PLUMIN, and LCNT is the printed 
line counter. 

UTILITY ROUTINES AND COMMON REFERENCES 


common/contrl/ 

COMMON/WT/ 

COMMON/CUTFO/ 

COMMON/STEPC/ 

C OMMON/G ASDAT/ 

COMMON/ waft/ 

common/datar/ 

COMMOi\/FREE/ 

COMMON /GASCON/ 

COMMON/MOL/ 

ccmmon/head/ 

COMMON/TAPRIT/ 

COMMON/INPUT/ 

COMMON/FSTAG/ 

common/gappa/ 

PAGE 

COMMON/PARTPl/ 

TAB 

common/par TP2/ 

IDMTAB 

COMMON /MASSC/ 

EMOFV 

COMMON/PARTTP/ 

THERMO 

COMMON/PSLD/ 

PFP 

COMMON/DRAGC f/ 


METHOD OF SOLUTION 



Not applicable. 
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SUBROUTINE NAME; PLUMIN 


DESCRIPTION 

PLUMIN reads in the input data {input via cards) necessary to perform 

the streamline -normal solution. This routine provides control for all input 

functions by selectively calling pertinent input routines and/or the transonic 
solution. 

CALLING SEQUENCE 

CALL PLUMIN (KIWI, K1W2, NTAPE, NSETS, RRT, XSHSV, ITRS) 
UTILITY ROUTINES AND COMMON REFERENCES 


COMMON/CONTRL/ 

COMMON/LIPCOM/ 

common/cutfo/ 

COMMON/DRAGCF/ 

COMMON /DATAR/ 

COMMON/PS LD/ 

COMM on /GASCON/ 

COMMON/CRITLR/ 

COMMON/HEAD/ 

COMM ON/ WAFT/ 

COMM ON /IN PUT/ 

COMMON/XXSH/ 

COMMON/STEPC/ 

COMMON/FREE/ 

common/tflag/ 

COMMON/MOL/ 

ccmmon/sigmb/ 

common/taprit/ 

common/visex/ 

common/chemcn/ 

common/varsl/ 

GASRD 

common/parttp/ 

BOUND 

common/partpi/ 

LIPIN 

COMMON/PARTP2/ 

aoastr 

COMMON/GAPPA/ 

MASCON 

common/writpt/ 

SETHTG 

COMM ON/MASSC/ 

PARTIN 

COMMON/BPRESW/ 

PART PH 

COMMON/SIGNAL/ 

PLMOUT 

METHOD OF SOLUTION 


Not applicable. 
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FUNCTION NAME; POFEM 


DESCRIPTION 

This function computes the local static pressure as a function of Mach 
number, entropy and total temperature (ideal gas, two phase only), 

CALLING SEQUENCE 

P = POFEM (EM, S, KIWI, K1W2) 

where P is the resultant static pressure found from the Mach number, EM, 
and entropy, S. NOTE: The appropriate values of the gas properties must 
be stored in common upon entry to this routine. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/GASCON/ 

COMMON/TEMPER/ 

UTILITY - None 


METHOD OF SOLUTION 

Thermally perfect gas relationships are used to find the pressure, 

-y/y-i ^ \~y/y~^ 


P = Poe 


-S/R 


' \ ^ f 
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SUBROUTINE NAME; POFH 


DESCRIPTION 

This routine utilizes the tabulated data of enthalpy and specific heat as 
functions of temperature for each species of a finite rate chemistry case to 
calculate pressure, as a function of enthalpy for a real gas, in a Prandtl- 
Meyer expansion. 


CALLING SEQUENCE 


CALL POFH (VF, HT, DELTA) 


where 


VF is the final velocity 
HT is the total enthalpy 
DELTA is the flow deflection angle. 


UT11.ITY ROUTINES AND COMMON REFERENCES 
COMMON/GASCON/ 

COMMON/PCTC/ 

COMM ON/EX PER/ 

COMM ON /C PM UK/ 

ITSUB 


METHOD OF SOLUTION 

The routine solves for pressure by incrementally changing the flow c.ngle 
until the final flow angle is obtained. At each increment the routine determines 
new gas properties from the tables on enthalpy and specific heat as functions 
of temperature, then uses these properties for the next increment. The result 
is an integration of the flow properties through the angular change, DELTA. 
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SUBROUTINE NAME; PPATPT 


DESCRIPTION 

This subroutine calculates and stores gas and particle dependent variables 
as a function of the independent flow properties. 

CALLING SEQUENCE 

CALL PPATPT (M,IC,KC,VG, THETA, SG,K2W1,K2W2,KP»ISKIP,PG) 


where 


M is the number of particle sizes present at the point 

IC is the point number for which particle and gas flow 

properties are to be calculated 

KC is the line identification flag 

VG is the gas velocity at the point 

THETA is the gas flow angle at the point 

SG is the gas entropy at the point 

K2W1 is a dummy variable 

K2W2 is a dummy variable 


ISKIP 


is the temporary array storage location for the 
particle and gas flow properties 

= 0 calculate particle properties only 

= 20 calculate gas and particle properties 

= 40 calculate gas properties only 

array containing the point independent flow properties 


UTILITY ROUTINES AND COMMON REFERENCES 


common/tflag/ 

COMMON/PAR TP 1/ 

COMMON/PARTP2/ 

COMMON/GAPPA/ 

COMMON/ONTSPT/ 

COMMON /GASCON/ 

COMM ON /C ON T R L/ 

COMMON/CPMUK/ 


COMMON/VISEX/ 

COMMON/TEMPER/ 

COMMON/FSTAG/ 

COMM ON/DA TAR/ 

COMMON/FREE/ 

common/criter/ 

COMMON/PSLD/ 

COMMON/XXSH/ 
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COMM ON /drag CF/ POFEM 

COMMON/PCTC/ PFP 

THERMO TEMTAB 

TOFV DRAGMR 

EMOFV DRAGCP 


METHOD OF SOLUTION 

The routine is entered knowing the gas independent variables (V, S, OF 
or H^) and particle independent variables (u, v,p, h). The gas dependent 
variables {T, P, p, ,0^, Pr) and particle dependent variables (Hg, drag and 
heat transfer terms) are calculated and stored for use in other parts of the 
code. 
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SUBROUTINE NAME; PRANDT 
DESCRIPTION 

This subroutine computes the Prandtl -Meyer expansion angle for a 
given boundary angle and divides this angle into a series of expansion "rays** 
(unless the number of rays has been specified in the input). The flow prop- 
erties at each angular increment are set and stored in the PHO array, 

CALLING SEQUENCE 

CALL PRANDT (I, J, THETAB, NPM, IFLAG, ITYPE, K 1 Wl, K 1 W2) 

where 

I represents the corner point 

J indicates a characteristic line 

THETAB is the boundary angle 

NPM = number of Prandtl -Meyer increments 
(calculated in PRANDT) 

IF LAG is an error flag 

ITYPE indicates if upper (2) or lower (1) boundary 
is being considered 

UTILITY ROUTINES AND COMMON REFERENCES 


COMMON/CRITER/ 

THERMO 

C OMMON/DAT AR/ 

THETPM 

COMMON/GASCON/ 

UOFV 

common/stepc/ 

EMOFV 

COMMON/CON TRL/ 

TOFV 

COMMON/PCTC/ 

POFEM 

COMMON/CPMUK/ 

TOFH 

COMMON/PAR TP 1/ 

SPCTX 

COMMON/PARTP2/ 

PFP 

common/fstag/ 

IDMPFP 

COMMON/CHEMXX/ 
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METHOD OF SOLUTION 

The routine is entered with known flow properties at the point of dis- 
continuity along with the known corner and boundary flow angles. From the 
known angles and the preset number of degrees per ray, the number of incre- 
ments is calculated. The distribution of P-M rays is then adjusted by a 
weighting function. Subroutine THETPM is entered with known initial condi- 
tions and the number of degrees per ray and returns with a velocity. These 
new conditions are then set into the PHO array. See Volume I, Sections 5 
and 6.9, for the details of calculation. 
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SUBROUTINE NAME; PRFRBD 


DESCRIPTION 


This subroutine calculates the flow properties at the Intersection of a 
particle limiting streamline and a plume boundary. 

CALLING SEQUENCE 


where 


CALL PRFRBD (IS, JS, IN. KN, I, K) 


IS = point number of the old (J) data surface plume boundary 
JS = line indicator of the old data surface 

IN £ point number of the old (J) data surface limiting streamline 
KN = line indicator of the old data surface 

I n point number of the new (K) data surface limiting streamline 
K = line indicator of the new data surface. 


UTILITY ROUTINES AND COMMON REFERENCES 

COMMON/DATAR/ COMMON/CON TRL/ 

COMMON/PAR TP 1/ COMMON/FSTAG/ 

COMMON/PARTP2/ PFP 

COMMON/GAPPA/ INRSCT 

COMM ON/S LIPPT/ IDMPFP 

COMMON/ONTSPT/ PPATPT 

METHOD OF SOLUTION 

Once the new data surface has been completed and it has been deter- 
mined that a particle limiting streamline has crossed the plume boundary, 
the location of the intersection is determined by the intersection of a line 
passing through the old and new limiting streamline points. This establishes 
two interpolation factors. One along the limiting streamline and one along 
the plume boundary. Gas properties at the intersection point are interpolated 
for between the two plume boundary points and particle properties are inter- 
polated for between the two limiting streamline points. The interpolated point 
and properties are then used as the plume boundary point for the new line and 
the calculation for the next line is then initiated. 
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FUNCTION NAME; RGMOFP 


DESCRIPTION 

This subroutine finds Mach number as a function of pressure, O/F ratio 
(or total enthalpy) and entropy. The difference between this routine and 
EMOFP is that in this case the gas properties are not known prior to entry. 

CALLING SEQUENCE 

EM = RGMOFP (OF, S, P.K2W1, KIWI) 

where EM is the resultant Mach number, P is the local static pressure, S is 
the local entropy, and OF is the local O/F ratio (or total enthalpy). 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON /C ON TRL/ 

COMMON /GASCON/ 

COMMON/ISEA/ 

COMMON/GASDAT/ 

POFEM 

EMOFV 

ITSUB 

VOFEM 

EMOFP 

ERRORS 

TAB 

THERMO 

METHOD OF SOLUTION 

The real gas tables have, as independent variables, OF ratio (total 
enthalpy), entropy and velocity. If the velocity is not known, an iterative 
solution must be employed to find Mach number from pressure, entropy, 
and OF ratio (or total enthalpy). 
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FUNCTION NAME ! RGVOFM 
DESCRIPTION 

This subroutine finds velocity as a function of Mach number, entropy 
and O/F ratio (or total enthalpy). The difference between this routine and 
VOFEM is that the gas properties are not known prior to entry, 

CALLING SEQUENCE 

V = RGVOFM (OF, S, EM, K2W,K1W) 

where V is the resultant velocity computed from O/f ratio or total enthalpy, 
OF, entropy, S, and Mach number, EM. 

UTILITY ROUTINES AND COMMON REFERENCES 
C OMMON/C ON T R L/ 

COMMON /CHEMCN/ 

COMMON/GASDAT/ 

COMM ON /GASCON/ 

THERMO 

TAB 

VOFEM 

EMOFV 

ITSUB 

ERRORS 

METHOD OF SOLUTION 

The real gas tables have, as independent variables, OF ratio (or total 
enthalpy), entropy and velocity. If the velocity is not known, an iterative 
solution must be employed to find the velocity from Mach number, OF ratio 
(or total enthalpy) and entropy. 
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FUNCTION NAME; R HOF EM 


DESCRIPTION 

RHOFEM computes the local densit/ as a function of Mach number and 
entropy, 

CALUNG SEQUENCE 

RHO = RHOFEM (EM, S, KIWI, K1W2) 

where RHO is the resultant density found from local Mach number and local 
entropy. NOTE: The appropriate values of the gas properties must be 
stored in common upon entry to this routine. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/GASCON/ 

POFEM 

METHOD OF SOLUTION 

Thermally perfect gas relationships are used to find the density. 

/ v-1 

^ = Po V ) 
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SUBROUTINE NAME: RITE 


DESCRIPTION 

This subroutine tells the program user (in no uncertain terms) that he 
has made a fatal error. The next executable statement is a STC P. 

CALLING SEQUENCE 

CALL RITE(I) 

UTILITY ROUTINES AND COMMON REFERENCES 
None 

METHOD OF SOLUTION 
Not applicable. 
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function NAME; ROTERM 


DESCRIPTION 

ROTERM computes the geometrical factor, F^., Fj^, used in the axisym- 
metric term of the compatibility equation and as an interpolation parameter. 

CALLING SEQUENC E 

F = ROTERM (THETA, DELTA, EMU, R3, RI.K2W1.K2WZ) 

where 

THETA is the flow angles of the known points (6j or 9jj) 

DELTA defines the quadrant being considered 
EMU is the Mach angles of the known points (pj or 
R3 is the coordinates of the new point or 

RI is the coordinates of the known point (rj or Xj) 

UTILITY ROUTINES AND COMMON REFERENCES 
None 

METHOD OF SOLUTION 

The method-of-characteristics solution uses this routine to determine 
a coefficient needed in its solution. This term (see Eq. (6,29), Section 6 of 
Ref. 4) can be written as; 

(sinjltj (djjj - d) 

F = — ;;;; 

sin(ir/4 + 6(6 + M - JtA)) 

By the proper choice of d(r or x), 6 and the sign of /X, indeterminant forms 
are eliminated in the evaluation. 
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SIIUHOUI’INK NAME; RWU 


DESCRIPTION 

This routine is a MSFC Univac 1108 system routine used to read and 
write from FASTRAN files. 

CALLING SEQUENCE 

CALL RWU (KSUNIT,A(I, J), NS, KSEC, IFCN, ISTAT, NWT) 

where 

KSUNIT is the unit number of the FASTRAN file 

A (I, J) is the array being read or written 

NS is the number of entries in the array 

KSEC is the location in the file of the required data 

IFCN indicates to read data (=16) or write data (=8) 

ISTAT is a status indicator 
NWT is an output indicator 

UTILITY ROUTINES 
None 

METHOD OF SOLUTION 
Not applicable. 
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SUBROUTINE NAME: SETHTG 


DESCRIPTION 

This routine computes the gas total enthalpy for a case when finite rate 
chemistry is being used and the startline is to be generated by the program 
for gaseous flows only. 

CALLING SEQUENCE 

CALL SETHTG 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/VISEX/ 

COMMON/PC TC/ 

COMMON/GASCON/ 

COMMON /CHEMCN/ 

COMMON/CHEMXX/ 

COMMON/LIPCOM/ 

common/sigmb/ 
c ommon/g asdat/ 

TKEY 

THERMO 

METHOD OF SOLUTION 

The routine interpolates for the flow properties at the specified start - 
line Mach number usiiig the equilibrium thermodyrnamic data tables. The 
resultant temperature and velocitjr are then used to obtain the flow properties 
from the species enthalpy and specific heat tables. The total enthalpy is cal- 
culated from the static enthalpy and velocity. This procedure is used to 
ensure property compatibility when transferring from the equilibrium tables 
to the species finite rate tables. 
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SUBROUTINE NAME; SITER 


DESCRIPTION 


This routine determines the entropy of the gas knowing the velocity, 
static pressure and total enthalpy or O/F ratio. 


CALLING SEQUENCE 

CALL SITER(HG, S, EM, V, PC, PL) 

where 

HG is the known total enthalpy or O/F ratio 

S is the gas entropy 

EM is the gas Mach number 

V is the known gas velocity 

PC is the gas total pressure 

PL is the known gas static pressure 


UTILITY ROUTINES AND COMMON REFERENCES 


COMM ON /GASCON/ 

EMOFV 

ITSUB 

POFEM 

THERMO 


METHOD OF SOLUTION 


This subroutine iterates on the gas entropy until the guessed entropy, 
known velocity and enthalpy results in a static pressure which is within the 
convergence criteria of the known static pressure. 
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SUBROUTINE NAME; SLDP 

description 

This subroutine finds the solutions to a set of N simultaneous linear 
equations . 

CALLING SEQUENCE 

CALL SLDP(X, A,N) 

where 

X is the solution matrix 

A is the coefficient matrix 

N is the order of the coefficient matrix 

U TILITY ROUTINES AND COMMON REFERENCES 
None 

METHOD OF SOLUTION 

The set of N simultaneous equations are solved using a Gauss- Jordan 
reduction scheme with the diagonal pivot strategy. 



U 


3-217 


.OCKHEEO - HUNTSVIUE RESEARCH A ENGINEERING CENTER 


SUBROUTINE NAME; SLPLIN 
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DESCRIPTION 

This subroutine handles the calculation of the points on the slip line. 
Two points are assigned to every slip line. 

CALLING SEQUENCE 

CALL SLPLIN (IS, JS, IN, KN , IFLAG, ICAUNT, K 1W2, K2W2) 


where 


IS, JS is the storage array of the known point on the lower side of 
the slip line of the reference normal line (J-line) 

IN,KN is the storage array of the known point below the slip line 
on the current normal (K-line) 

IFLAG is a control indicator for sending in and out necessary 
messages 

ICAUNT indicates the status of the iterative solution 

0 - first time calculation of a particular slip line 

1 - calculated results converged 

2 - calculation completed but not final 






tl^ 


UTILITY ROUTINES AND COMMON REFERENCES 


COMMON/CONTRL/ 

EMOFV 

common/criter/ 

ERRORS 

common/datar/ 

INRSCT 

COMM ON /DROP/ 

ITSUB 

COMMON /GASCON/ 

PHYSOL 

COMMON/SLIPPT 

POFEM 

CARCTR 



METHOD OF SOLUTION 

The slipline points location is found by the usual manner as one of the 
interior points, and their flow properties are assumed initially to be identical 
to those of the corresponding points on the reference normal line* The velocity 
of the lower side point of the slipline is calculated with the aid of subroutines 
PHYSOL and CARCTR by using the II-characterist:c» Pressure is then cal- 
culated with subroutine POFEM. 
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Letting the upper side point of the slipline have the same flow angle as 
the lower side point; the velocity of the upper side point can be calculated with 
llu* I-chai*actorislic. Pressure is tlien calculated. 

The pressure calculated for the slipline points is compared. The flow 
angle is adjusted, if necessary, until identical pressure is attained on both 
sides of the slipline. 

See Volume I, Section 6.10 for the details of the calculation. 
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SUBROUTINE NAME; SOKFLX 
DESCRIPTION 

This subroutine solves for the flow properties downstream of a reflected 
shock, knowing the turning angle and the reflected shock upstream flow proper- 
ties. Real gas effects are considered in the calculations. 

CALLING SEQUENCE 

CALL SOKFLX (PD, PU, J. K, ITYPE, K IWl, K2W2) 

where 

PD is the array containing the downstream flow properties 
PU is the array containing the upstream flow properties 
J is the line identifier for the upstream flow properties 
K is a dummy variable 
KIWI is a dummy variable 
K2W2 is a dummy variable 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/CRITER/ 

COMMON /GASCON/ 

COMMON/DATAR/ 

COMMON/CONTRL/ 

ESHOCK 

ITSUB 

ERRORS 

THERMO 

UOFV 

METHOD OF SOLUTION 

The routine is entered with the {low properties, PU, downstream of the 
incident shock and a known flow angle downstream of the reflected shock. An 
initial shock angle is assumed and a flow angle is calculated. The calculated 
flow angle is compared to the known flow angle and successive iterations on 
shock angle are performed until the flow angle difference is sufficiently close 
to zero. 


3-220 

LCCKHEEO HUNTSVILLE RESEARCH & ENGINEERING CENTER 


SUBROUTINE NAME; SOKSOL 


DESCRIPTION 


This subroutine handles the calculation of different types of shock wave 
points. The following cases are considered; 


1. Right-running shock 

2. Left -running shock 

3. Right-running shock incident on a lower boundary 

4. Left -running shock incident on an upper boundary 

5. Right-running shock attached at upper compression corner 

6. Left-running shock attached at lower compression corner 

7. Right -running shock reflected from the upper boundary 

8. Left-running shock reflected from the lower boundary 

9. Right-running weak shock at the upper wall 

10. Left-running weak shock at the lower wall 


(ITYPE = 111) 
(ITYPE = 112) 
(ITYPE = 121) 
(ITYPE = 122) 
(ITYPE = 131) 
(ITYPE = 132) 
(ITYPE = 141) 
(ITYPE = 142) 
(ITYPE = 151) 
(ITYPE = 162) 


CALLING SEQUENCE 

CALL SOKSOL (IN, KN, IS, J, ITOTK, IFLAG, ITYPE, K2W1,K2W2) 
where 


(IN, KN); storage location in PHO array for the shock upstream 
point on the new normal (KN-line) 

(IS, J); storage location in PHO array for a reference point on 
the known normal (J-line) 

ITOTK; total number of the KN-line; this is corrected according 
to the type of shock point 

IFLAG; for sending in and out necessary messages 

ITYPE; denotes type of shock points to be calculated 
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UTILITY ROUTINES AND COMMON REFERENCES 


COMMON/CRITER/ 

COMM ON/GASCON/ 

COMMON/DA TAR/ 

COMMON/CONTRL/ 

COMM ON/S LI PPT/ 

COMMON/PHISOL/ 

COMMON/TEMPOl/ 

C0MM0N/TEMP02/ 

COMMON/DROP/ 

COM MON /GLOBAL/ 

COMMON/GAPPA/ 

COMMON/FSTAG/ 

COMMON/PARTFP/ 


BOUNDA 

CARCTR 

ERRORS 

ESHOCK 

INRSCT 

ITSUB 

PHYSOL 

PHYZOL 

PPATPT 

STRNOR 

THERMO 

STRNOR 


METHOD OF SOLUTION 


The general technique for handling shock wave points is: (1) find the 
location of the shock points and the flow properties of the shock upstream 
point, (2) calculate the flow properties of the shock downstream point with 
the oblique shock relation by using the shock upstream properties, (3) cal- 
culate the flov 'ocity of the shock downstream point with one characteristic 
line by using the shock downstream properties, (4) compare the velocity 
calculated from Steps 2 and 3, and (5) if the velocity is not the same, adjust 
the shock strength and repeat the process from Step 1. 


For each individual case, see Vol.I of this report for detail. 
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SUBROUTINE NAME: SPCTX 


DESCRIPTION 

This routine controls the input and output from a FASTRAN file of the 
chemical species in a finite rate chemistry case. 

CALLING SEQUENCE 

CALL SPCTX (IFCN.IPT.ILINE, JLINE) 

where 

IFCN indicates to write ( = 1) on drum or to read 
(=2) from drum 

IPT is the flowfield point number 

ILINE is the flowfield line number (one or two) 

JLINE specifies to store the data in SPCT(I, 1) or 
SPCT(I, 2) 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/CHEMXX/ 

COMMON/CHEMCN/ 

COMMON/CONTRL/ 

RWU 

METHOD OF SOLUTION 

The routine calculates the location in the FASTRAN file where the de- 
sired data are read from or stored in. Subroutine RWU is then called to per 
form the indicated operation. 
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SUBROUTINE NAME; STGMOD 


DESCRIPTION 

This subroutine computes the gas thermodynamic properties in the 
transition flow regime. 

CALLING SEQUENCE 

CALL STGMOD (I. K) 

where 

I = the point number 
K = the line number 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/GASCON/ 

COMMON/FREE/ 

COMMON/GSV/ 

COMMON /F STAG/ 

COMMON /DATAR/ 

UTILITY - None 

METHOD OF SOLUTION 

The routine is entered knowing the flow regime, Knudsen number and 
flow properties (M , T, P, V, y, S, H, p) of tne (I,K) point. The specific heat 
ratio is then determined based on the flow regime. 

Continuum — -y is same as entered 

Vibrational mode frozen — y is set to 1.4 

Rotational mode frozen — y is set based on a curve fit of 
gamma from 1,4 (vibrationally frozen) to 1,667 {free 
molecular) based on Knudsen number 

Translationally frozen {free molecular) — y « 1,667 

Once the local gamma is determined then the local static properties, T, P and V, 

are used to determine the local tota] conditions (T , P ) and Mach number. 

' o o 
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SUBROUTINE NAME; STRNOR 


DESCRIPTION 

This subroutine handles the calculation of the flow properties of the 
point in question. The following cases are considered: 


1. Interior point, uses 1- and Il-characteristic 

2. Lower solid boundary point, uses I-characteristic 

3. Upper solid boundary point, uses II -characteristic 

4. Lower free boundary point, uses I-characteristic 

5. Upper free boundary point, uses Il-characteristic 


(ITYPE = 11) 
(ITYPE = 21) 
(ITYPE = 22) 
(ITYPE = 31) 
(ITYPE = 32) 


Except those ITYPE numbers shown above, sometimes, one of the following 
numbers (500, 600, 700, 800, 900) is added to the original number to transmit 
more information to this subroutine. 


CALLING SEQUENCE 


CALL STRNOR (I1,K1,IS1, JSl, IN 1, KN 1, IFLAG , ITYPE, K IWl , K 1W2) 


where 

n , K 1 
ISl JSI 

INl.KN I 

IFLAG 

ITYPE 


is t!ie storage location in the PHO array for the point 
in question on the new normal (K-line) 

is the storage location in the PHO array for the known 
reference point on the old normal (J-line); normally 
this point is on the same streamline as the point I1,K1 

is the storage location in the PHO array for the known 
point Il,Kl on the new normal (K-line) 

is a control indicator for sending in and out necessary 
messages 

denotes the type of point to be calculated 


UTILITY ROUTINES AND COMMON REFERENCES 


COMMON/FREE/ 
COMM ON /IS EA/ 
COMMON/CHEMCN/ 
COMMON /CHEMXY/ 


COMMON/CPMUK/ 
COMM ON /RUE/ 
COMM ON/C HEMXX/ 
COMMON/TUIPA/ 
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COMMON/CON TRL/ 

COMMON/PARSTU/ 

COMMON/CRITER/ 

COMMON/FSTAG/ 

COMMON/DATAR/ 

BOUND 

COMMON /DR OP/ 

IDMPFP 

COMMON /GASC ON / 

PPATPT 

COMMON/PHISOL/ 

FNEWTN 

COMMON/SLIPPT/ 

INRSCT 

COMMON /T EM P02/ 

GAPPBI 

COMMON/TOTAL/ 

PHYSOL 

COMMON/CROSS/ 

SPCTX 

COMMON/STEPC/ 

PFP 

COMMON/AVPROP/ 

RGMOFP 

COMMON/PARTPl/ 

COEFF3 

COMMON/PARTP2/ 

ROTERM 

common/gappa/ 

SLPLIN 

COMMON/ON TSPT/ 

NEWENT 

COMMON/POIN TC/ 

UOFV 

COMMON/NSF/ 

VOFEM 

COMMON/OVER LA/ 

COEFEQ 

COMM ON /G LOBAL/ 

AVER AG 

COMMON/PSEC/ 

CHECK 

COMMON/INTEU/ 



METHOD OF SOLUTION 

Initially, the flow properties of the point in question are assumed to be 
the same as those of the known upstream point on the same streamline, and 
its location is found by intersecting the average streamline from the reference 
point (ISl, JSH on the J-line and the average normal from the known point (INI, 
KN i) on the K-iine. Subroutine PHYSOL is used to find the reference prop- 
erties for the characteristic lines and Eq. (3.3) is then used to calculate velocity 
and flow angle for the new point. Under normal conditions, the mass flow rate 
'letwecn two streamlines is conserved, but when the screamline meets a shock 
wave, no attempt is made to conserve the mass flow rate, because the streamline 
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is terminated at the shock upstream region and a new streamline is generated 
from the shock downstream point. 

The Iterative method is employed to find the velocity and the flow angle 
until they do not change appreciably betv'een the successive iterations. During 
this iteration, the location of the new point is perturbed. 


/ 
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FUNCTION NAME; TAB 


il 

^ J 


DESCRIPTION 

This function computes the thermodynamic data storage location and 
retrieves data frotr. the TABB array. 

CALLING SEQUENCE 

= TAB (I, J,K, L) 

where 

I, J, K, L are indices which are used to determine the storage 
location 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/GASDAT/ 

UTILITY - None 

METHOD OF SOLUTION 

The thermodynamic data storage location is computed using the follow- 
ing relation 

IX = I + 10 * (J-l + 2 * (K-1 + 13 * (L-1))), 
and retrieved using the relation 

TABB = TABB (IX) 
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SUBROUTINE NAME: TEMTAB 


DESCRIPTION 

This subroutine will perforin a table lookup for particle temperature 
as a function of enthalpy or for particle enthalpy as a function of temperature. 

CALLING SEQUENCE 

CALL TEMTAB pc, Y, WHICH) 

where 

X is the unknown variable 
Y is the known variable 

WHICH is the lookup control variable 

indicating to lookup temperature ( = 1) 
or enthalpy (=2) 

UTILITY ROUTINES AND COMMON REFERENCES 

common/contrl/ 

common/tpeh/ 

common/tflag/ 

UTILITY - None 
METHOD OF SOLUTION 

The unknown variable (particle temperature or enthalpy) is calculated 
by either assuming constant heat capacities or by applying linear interpolation 
techniques to the tabulated data input on cards 32. 
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SUBROUTINE NAME: THERMO 
DESCRIPTION 

This subroutine utilizes real or ideal gas information obtained from 
the flowfleld tape (or tables) and a local O/F ratio (or total enthalp/) to call 
subroi\tine FABLE to calculate thermodynamic gas properties locally in the 
flow. 


CALLING SEQUENCE 


where 


CALL THERMO (OF, SS, VV) 

OF = gas total enthalpy or O/F ratio 

SS = gas entropy 

VV = gas velocity 


UTILITY ROUTINES AND COMMON REFERENCES 


COMMON/GASCON/ 

COMMON/CPMUK/ 

COMMON/GRINT/ 

COMMON/PARTPl/ 

COMMON/PARTP2/ 

COMMON/TEMPER/ 


COMMON/GASDAT/ 

COMMON/FAB/ 

COMMON/CQNTRL/ 

TAB 

FABLE 

THERMU 


METHOD OF SOLUTION 

The routine is entered with the local O/F ratio (or total enthalpy), OF, 
entropy, SS, and velocity. VV. The local ratio is used to determine which set 
of thermodynamic tables that subroutine FABLE should use to perform table 
lookup of the local thermodynamic gas properties. Subroutine THERMO then 
uses the local thermodynamic gas properties obtained from FABLE to perform 
an interpolation between the O/F (or total enthalpy) tables based on the local 
O/F ratio (or total enthalpy) . 
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SUBROUTINE NAME; THERM 1 


DESCRIPTION 

This routine determines the gas thermodynamic properties for a finite 
rate chemistry case. 


CALLING SEQUENCE 


where 


CALL THERM 1(HT,V) 
HT is the gas total enthalpy 


V is the gas velocity 


UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/TEMPER/ 

COMMON/GASCON/ 

COMMON/PCTC/ 

COMMON/CPMUK/ 

COMMON /CON TRL/ 

COMMON/VISEX/ 

common/chEmcn/ 

common/chemxx/ 

common/gasdat/ 

TKEY 

TOFH 


METHOD OF SOLUTIO N 

The routine looks up enthalpy and specific heats from tabulated data of 
enthalpy and specific heats as functions of temperature. The enthalpy, specific 
heats and molecular weights of each species are used, along with species con- 
centrations, to calculate the mixture gas constant, gamma, enthalpy, specific 
heat, and total pressure and temperature. These properties, along with velocity 
are used to calculate total enthalpy and Mach number. 
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vSUBROUTlNJi: NAME; THETPM 
DESCRIPTION 

THETPM performs a numerical integration to calculate properties 
through a Prandtl-Meyer expansion. Either the case of known final velocity 
or known final expansion angle may be handled. 


CALLING SEQUENCE 

CALL THETPM (OF, S, DELTA, VF, VI, IT, ITYPE, K1W,K2W) 


where 


OF 

is the local O/F ratio or total enthalpy 

S 

is the local entropy level 

DELTA 

Is the total expansion angle 

VF 

is the final velocity downstream of the expansion 

VI 

is the initial velocity upstream of the expansion 

IT 

is a control parameter indicating if expansion to 
solid wall or free boundary is taking place 

ITYPE 

indicates if an upper (2) or lower (1) boundary is 
being considered. 


UTILITY ROUTINES AND COMMON REFERENCES 
COMMON /GASCON/ 

COMM ON/ST EPC / 

COMMON/CON TRL/ 

THERMO 

TOFH 

ITSUB 

TOFV 

ERRORS 

METHOD OF SOLUTION 

The integral equation 

Vj- 

f - 1^ - A9 = f(Vj.) = 0 

^1 
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2 2 

where M = V /yRT is solved knowing either the final velocity, Vj., or the 
expansion angle (A9). As can be seen, if the final velocity, is known, the 
integration progresses straightforwardly to a solution. However, if the ex- 
pansion angle is known, an iterative procedure must be employed to pick the 
velocity which produces the desired expansion angle. 


D 

fl 

0 
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subroutine NAME! THRUST 
DESCRIPTION 

THRUST computes the vacuum thrust produced by a two-dimensional 
or axtsymmetric nozzle. Addition of the thrust at the throat and the inte- 
grated pres aufe ^long the nozzle wall yields the final thrust. 

CABLING SEQUENCE 

CALL THRUST (L, K, II, Jl, iTYPE, ICALC, KIWI, KIW2) 

where L, K designates the unknown characteristic point and XI, J1 is the known 
characteristic point. ITYPE specifies ii the point is on the upper or lower 
boundary and ICALC is a counter with the values of 1, 2 or 3. (1 specifies 

integration at the throat, 2 - along the nozzle and 3 - at the exit.) 

UTILITY ROUTINES AND COMMON REFERENCES 
eOMMON/CONTRL/ 

C OMMON/DAT AR/ 

COMMQN/FORCE/ 

COMMON /INPUT/ 

COMMON/PARTPl/ 

COMMON/PARTP2/ 

COMMON/FSTAG/ 

COMMON/WT/ 

COMMON/PS LD/ ■’ 

COMM ON/IN TCR/ 

PFP 

VEMAG 

METHOD OF SOLUTION 

Thrust is found by first computing the momentum thrust in the sonic 
area or throat of the nozzle. The static pressure is then integrated along the 
nozzle wall and the total thrust found by s junmation of the pressure and mo- 
mentum terms (both gas and particle). Inclusion of a fa':<'ov in the incremental 
force term accounts for either two-dimensional or axisymmetric flow. 
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SUBROUTINE NAMEt TKEY 
DESCRIFTtON 

This rouUne determines the proper index to be used in the enthalpy and 
specific heat tables and calculates interpolation factors. 

CALLING SEQUENCE 

CALL TKEY (T, TTB, ITKEY, SDT,HDT,NT) 

where 

T = the temperature 

TTB s the temperature tables used as independent variables 

ITKEY = the resultant index 

SDT and HDT k interpolation factors 

NT = number of entries in the temperature table* 


UTILITY ROUTINES AND COMMON REFERENCES 
None 


METHOD OF SOLUTION 

The routine searches the temperature .able until the input temperature 
is bounded. The index of the lower bound is stored in ITKEY and the inter- 
polation factors are calculated by the equations 


and 


SDT 


T - TTB (ITKEY) 

TTB (ITKEY + 1) - TTB (ITKEY) 


HDT 


TTB (ITKEY + 1) - T 
TTB (ITKEY + 1) - TTB (ITKEY) 
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FUNCTION NAME : TOFEM 
DESCRIPTION 

TOFEM computes the local static temperature as a function of Mach 
number. TOFEM and TOFV are quite similar; the difference being if Mach 
number or velocity is the known quantity. 

CALLING SEQUENCE 

T = TOFEM (EM,K1W1,K1W2) 

where T is the one -dimensionally calculated local static temperature which 
exists at the Mach number, EM. NOTE; The appropriate values of the gas 
properties must be stored in common upon entry to this routine. 

UTILITY ROUTINES AND COMMON REFERENCES 
COl, 'MON/G ASCON/ 

UTILITY - None 

METHOD OF SOLUTION 

The thermally perfect gas relationships are used to find the static tern 
perature at the local Mach number. 


I + ^ M^ 
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FUNCTION NAME; TOFENH 


DESCRIPTION 

This routine calculates the temperature as a function of enthalpy for a 
finite -rate chemistry case. 

CALLING SEQUENCE 

= TOFENH(HU) 
where HU Is the static enthalpy 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/GASCON/ 

COMMON/PCTC/ 

COMMON /CPMUK/ 

COMMON/VISEX/ 

COMMON /CHEMCN/ 

COMMON/CHEMXX/ 

COMMON/GASDAT/ 

TKEY 

ITSUB 

METHOD OF SOLUTION 

The temperature is estimated initially and this temperature is used to 
calculate an enthalpy from the temperature-enthalpy tables. If the resultant 
enthalpy does not match HU, the temperature is incremented and the process 
repeated until the enthalpies converge. 
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FUNCTION NAME ; TOFH 
DESCRIPTION 

This routine calculates the temperature as a function of enthalpy for a 
finite rate chemistry case during a Prandtl-Meyer expansion. 

CALLING SEQUENCE 

^ TOFH (HU, V) 

where 

HU is the enthalpy 
V is the velocity 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/TEMPER/ 

COMMON/GASCQN/ 

COMMON/PCTC/ 

C OMM ON/C PM UK/ 

COMMON /VISEX/ 

COMMON/CHEMCN/ 

COMMON/CHEMXX/ 

, COMMON/GASDAT/ 

TKEY 

ITSUB 

POFH 

METHOD OF SOLUTION 

The methodology is the same as for TOFENH except that the gas constant, 
molecular weight, gamma and Mach number are also computed. 


I 
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FUNCTION NAME; TOFV 


DESCRIPTION 

This function computes the local static temperature as a function of 
velocity. TOFV and TOFEM are quite similar; the difference being if Mach 
number or velocity is the known variable. 

CALLING SEQUENCE 

T = TOFV (V, KIWI, KlW2) 

where T is the local static temperature which exists at the velocity, V. 
NOTE: The appropriate values of the gas properties must be stored in 
common upon entry to this routine. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/GASCON/ 

RITE 

ERRORS 

KIKOFF 

METHOD OF SOLUTION 

The thermally perfect gas relationships f >'e used to find the static 
temperature at the local velocity. 
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SUBROUTINE NAME; TRANS 


DESCRIPTION 

This subroutine provides overall control for initializing the data and 
reading the namelist data for the Kliegel two-phase transonic solution of a 
supersonic gas particle startline. 

CALLING SEQUENCE 

CALL TRANS (NTAPE, KSETS, RUT) 


where 

NTAPE = FORTRAN unit on which the startline is written 

NSETS = number of startline points where particles are 
present 

RUT = throat radius (ft) 


UTILITY ROUTINES AND COMMON REFERENCES 


COMMON/CONTRL/ 

COMMON/GASDAT/ 

COMMON/GASCON/ 

COMMON/CPMUK/ 

COMMON /TPEH/ 

COMMON/MASSC/ 

COMMON/DRAGCF/ 

COMMON/TRANSI/ 


COMMON/PAR TP2/ 

COMMON/ERR/ 

COMMON/NAMEA/ 

COMMON /NAMEl/ 

COMMQN/NAMEW/ 

TAB 

PAR TIL 


METHOD OF SOLUTION 
Not applicable. 
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SUBROUTINE NAME; TURN 


DESCRIPTION 

TURN solves for a shock wave which has a known turning angle (5). 

A condition of known turning angle exists when the flow is turned through a 
compression corner on a solid boundary. Real gas effects are considered 
in calculating conditions downstream of the shock. 

CALLING SEQUENCE 

CALL TURN {PU, PD, DELTA, IFLAG, KIWI, K1W2) 

where PU, PD represent flow conditions upstream and downstream of the shock, 
DELTA is the turning angle, and IFLAG indicates if the solution will or will not 
converge. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/CRITER/ 

COMMON/CONTRL/ 

THERMO 

EMOFV 

UOFEM 

ESHOCK 

ITSUB 

ERRORS 

UOFV 

METHOD OF SOLUTION 

An initial shock angle is assumed. This shock angle is used to calculate 
a turning angle. The calculated turning angle is compared to the known turning 
angle and successive iterations on shock angle are performed until the turning 
angle difference is sufficiently close to zero. 
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FUNCTION NAME; UOFEM 
DESCRIPTION 

This function computes the local Mach angle as a function of local Mach 
number. Prior to the calculation a test is made to ensure that the Mach num- 
ber is greater than one. 

CALLING SEQUENCE 

EMU - UOFEM (EM, KIWI, K1W2) 

where EMU is the Mach angle which exists at the local Mach number, EM. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON -None 
ERRORS 
KIKOFF 
RITE 

METHOD OF SOLUTION 

The following equation is solved for the local Mach angle. 
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FUNCTION NAME ; UOFV 
DESCRIPTION 

This function computes the local Mach angle as a function of local velocity. 
CALLING SEQUENCE 

EMU = UOFV (V, KIWI, K1W2) 

where EMU is the Mach angle which exists at the local velocity, V. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON -None 
UOFEM 
EMOFV 

METHOD OF SOLUTION 

The local velocity is converted into a Mach number using EMOFV. 

Function UOFEM is then entered with the calculated Mach number. The 
Mach angle is obtained from the following equation. 
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FUNCTION NAME; VOFEM 
DESCRIPTION 

This function computes velocity as a function of Mach number. 
CALLING SEQUENCE 

V = VOFEM (EM,KIW1,K1W2) 

where V is the local velocity which corresponds to the local Mach number, 
EM. NOTE: The appropriate values of the gas properties must be stored 
in common upon entry to this routine. 

UTILITY ROUTINES AND COMMON REFERENCES 
C OMM ON /GASCON/ 

TOFEM 

METHOD OF SOLUTION 

The thermally perfect gas relationship 

V (^) 

is solved for velocity. Local static temperature, T, is obtained from the 
input Mach number. 
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SUBROUTINE NAMEt WEAK 
DESCRIPTION 

This subroutine determines the Independent variables, entropy and 
velocity, SD, VD, downstream of a weak oblique shock. The gas properties 
upstream of the shock are known prior to entry. 

CALLING SEQUENCE 

CALL WEAK (OF, SU, VU, EPS, DELTA, SD, VD,K1W,K2W) 

where OF is the upstream O/F ratio (or total enthalpy), SU, VU are the up- 
stream entropy and velocity, EPS, DELTA are the shock angle and turning 
angle, and SD, VD are the downstream entropy and velocity. 

UTILITY ROUTINES AND COMMON REFERENCES 
C OMMON/G ASC ON/ 

THERMO 
EMOFV 
POFEM , 

RHOFEM 

ENTROP 
DELTA F 

METHOD OF SOLUTION 

From the known upstream entropy and velocity, the local gas properties, 
pressure, density, and upstream Mach number are calculated. The entropy 
rise across the shock is added to the upstream entropy to get total downstream 
entropy. Downstream velocity is calculated from the following relationship, 

Vy cos(0 
^D ~ cos(^ - 6) 
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FUNCTION NAME r WOFA 
DESCRIPTION 

WOFA computes the weight ilow per unit area as a function of Mach 
number. This calculation is only used in function AOASTR« 

CALLING SEQUENCE 

Weight Flow » WOFA (EM.KIWI.KIWZ) 

where EM is the local Mach number. NOTE: The appropriate values of the 
gas properties must be stored in common upon entry to this routine. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/GASCON/ 

UTILITY -None 


METHOD OF SOLUTION 

A 

Weight flow per unit area, W/A, is calculated from the thermally perfect 
gas relation. 


W 

A 


P M 
o 
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FUNCTION NAME; WTFLOF 


DESCRIPTION 

This fvmction computes the area normal to the flow which is bounded 
b 7 two streamline points. 

CALLING SEQUENCE 

a WTFLOF (M,N,K,A) 

where 

M = the point number of the lower streamline point 
N s the point number of the upper streamline point 
K = the line number 

A = a 1 for axisymmetric flow and a 0 for two- 
dimensional flow. 

UTILITY ROUTINES AND COMMON REFERENCES 
C OMMON/DAT AR/ 

COMMON/CONTRL/ 

UTILITY - None 

METHOD OF SOLUTION 

The area bounded by two points and normal to the average local flow 
vector is calculated via geometric relations 
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FUNCTION NAME ! XSI 
DESCRIPTION 

This function computes the storage location for the nonlinear interpo 
lation weighting functions required for thermodynamic property lookup and 
retrieves data from XSIDIM. 

CALLING SEQUENCE 

= XSI(I, J,K,L) 

where 

I, J, K, L are indices used to determine the storage location. 

UTILITY ROUTINES AND COMMON REFERENCES 
COMMON/XSrCOM/ 

UTILITY -None 

METHOD OF SOLUTION 

The storage location is computed using the following relation 
IX = I + 10 * (J-i + 2 * (K-1 + 13 * (L-1))) 
and retrieved using the relation 

XSI = XSIDIM(IX) 
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3.7 EXAMPLE PROBLEMS 


To familiarize the user with the operation of the RAMP computer pro- 
gram several sample cases are presented. Each sample case will consist of 
a description of the problem, a listing of the input data for the problem and a 
listing of the pertinent solution. 

Example Problem 1 

problem analyzes a single phase chemical equilibrium flow field 
with the following stipulations: 


1. Generate a startline at the nozzle exit plane for example 
problem Z, 

Z. The gas properties are to be read from cards, and 

3, The startline at the nozzle throat is to be calculated internal 
to the progreun. 


Figure 3-4 presents a schematic of a typical nozzle plume flow field. Table 
3-7 presents first a flow chart and then a listing of the u-uv; data for the 
specified problem; some of these cards are indicated in Fig. 3-4, Table 3-8 
presents a listing of the pertinent solution. 
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Table 3-7 


REQUIRED INPUT FORMAT FOR EXAMPLE PROBLEM 1 


Run Identification Cards 
Cards 1-3 


Rtin Control Card 
Card 4 


Boundary' Description 

a. Upper Boundary (Card 6) 

b. Lower Boundary (Card 7) 


Gas Identification 
Card 8 


Gas Properties 

O/F Ratio (Card 9) 

Entropy Level (Card 10) 

Gas Thermochemistry (Card 11) 


Start Line Data 
Card 18a 


Problem Limits 
Card 20 


Mesh Control 
Card 21 


Free Molecular Control 
Variables 
Card 22 


If gas properties are input on tape (ICON(l)=2) Cards 9, 10 and 11 are not 
required. 
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Table 3-8 

EXAMPLE PROBLEM 1 PERTINENT SOLUTION 
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•QOUOO 


•UOQOO 

^ODOCil 


•V12S7-01 •UUOQO 

. . 1ouh2»i«o .nnuni) 

•10100*01 

-«lQioD»ni. 

• UIIUUO *00000 

kOouad lOQuoo 

*«l93i*u2 
•81931*02 

•UOUOQ 
- .imuQO 


•ouooo 

■unnQa 


• 109S9*00 
• Il867«iig 

•uuuoo 

•DDOOO 

•10loO*Ut 

j.l01oO*01. 

•UQUOO 

«uouoo_ 

•ouuou 
lOOOOU 

•81931*02 

__„«8l93l*02. 

•uoooo 
•ooooo_ 


•UOOOO 
.tUQOOl] 


• 1 2760*00 

•l369)*UO 

•OOOOO 

•QOuDQ 

•ioino*oi 

^t 0 |o 0 * 01 . 

•OOOOO 

*00000 

•OUUOO 

toouoa 

•61931*02 (00000 

•81931*02. .DOOnO 


• OOOOll 
.fUUDOU 


* « I <1 606*00 

* •lSbl9*nO 

•OOOOO 

•OQOOQ 

•10100*01 
• I01n0*t»i 

•onuoo 

•onuflo 

- eOuoUU 
__ .00000^ .. 

•61931*02 

. ■81931*02 

•UUOOO 

•oouoo 


• UOUOf) 
»unnOfi 


•l6N32*Q0 

•OOUDO 

•10100*01 

fUCIUOU 

• ODtjOO 

•81931*02 

.00000 


•UO0QU 


•17)45*00 

• OOOOO _ 

-tJPioOtoi- 

*OOUQQ 

•QOUDO 

_.6L93I*02 

■ QOUOO _ 

•UDOOU 


*Ib2S7*oQ 

•Dooao 

• 10100*01 

• QOtlOO 

• OOOCJO 

•61931*02 

• OPUItO 


• UOOOl) 





RUN CUTOFF 

INFONnaT ion 







l|g.EEtl BOUllDAItY 



LOlsEJt UGUilDAfiY. 



R» *10000+C2 Xm 

••1 0000^02 

THETAtt 

•OOOOO 

**• *00000 Aa 

,50000*01 

TliETrta 

tV00DD9p2 
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Table 3*8 (Continued) 


SUPERSONIC FLO* analysis uS|nq TnE LOCKH£ED>hUNTSV ILLE MULTIPLE SHOCK COHPU|ER 

pmosrah 


case NU. 1 


PA 6 E 8 

CASebuS check case with tree molecular CaLCULaYiONS CONSlDEReb 


t 

V18N0 ROTNO TRANtIO CHAKL GAHV 

. •looaatos tiooaatoz.. .laooutoa fiaoaatiiL- ■aauoo 

feAHR 

^cODoa 


The hesh construction hill ae controleu by the eollorino variables 

OL interior- «5004'00 DX AXIS- .ZOO^-oO OL LlH- *108+01 OL DELETE- *S00»02 OEG P*N«f • 

*S004>01 P* 

4 VOOPOO 




IVJ 

tn 


•:5W.££S^ f^KSlPt«>^ «=|=W«, ...q,— 

■^’TTt tiSmstKH# %sSWBttrj^ I,,.,, ■ L 


cm rm cm cm cm 


czi cm cn 






■ i8ggrs^?sgag g5a^ ^ 

tiomiii^ 




:|^" ? 
i- f 

i I 


n 


|u 

k i 


-r»«*MP-* 

iliiunra-o^ 'Vmvop-vfi 'l^ptiaWrirH i ^ >— yij ’j;— gWr]i? 


asst &i^ mn mm 


Table 3-8 (Continued) 


m 



SUPERSONIC 

FLOW analysis ySlNO THE LOCKHEEO-HUMTSVILLE MULTIPLE 

SHOCK computer 

FROGRAtl 



1 

" 


CASE NO, 

i 



• 

PA«e 6 



GASEOUS CHECK CASE A t TH FREE HOLCCULAR 

calculations 

CONSiDeREO ~ 




t 


[ LlHt 

rOJNr OSCHiP - Kf.GjHE 

- . , I 

R 

IaCH -ANGLE 

X 

—PRESSURE 

H 

..DENSITY 

Theta 

_JEH£E«ATi!8E 

ENTH0P¥ VELOCtTV 

Gas const. local gahha 

0/f 

SHOCK angle 

ITR 

i 

I _ 1 

IH INPUT - CCHTIN 

.1 1067»OO 

_ •ocooo 

• toiao-^ot 

tOOOOO 

•OOOOO 

•39853*09 

•OOOOO 

0 



>8|93|«a2 

•10078*09 

WMS17-0J 

•50166*09 

•19929*09 ’ 

•11919*01 



i 1 

1 

IS INPUT - CCNTIN 

• 1 2700*00 
..ai93l*C2 

•OOUoO 

—• laO7Ar0t 

• inioo+o> 

119SI7>01 

•00000 
• 50166*09 

•OOOOO 
•-1 9929*QJt 

•396S3+Q9 
• It 919*01 

•OOOOO 

0 


ll_INe.WI_ -.5CNI1H 

^i3A?3*na 

—,00000 . 

il0l0u*01. _ 

tOODOO 

• oriDOO 

t3<j^S3«0^ 

•OOOOO 

II 

i U>‘ . 


•81931*02 

«Sa076»Oi| 

•19S17-01 

«G0 1 66^U*| 


•I|919*0I 



! ^ ' 
jjj 

17 INPUT - CONTIN 

• 1^606^00 

«OOOOQ 

^lnu7A<»Qif 

•lOlQQ^OJ 
al/tSlZ-C}! 

•00000 

•SQlAAtOi 

•uoooo 

f 1 0924«QR 

■ *39853*09 
.11*1 9*n 1 

•OOOOO 

0 

. 1 

I* input - CONTIN 

.|SS|9*00 

tOilOOD 

• 10 JOO'^01 

•00000 

•00000 

•3*653*09 

•OOOOO 

_Jg 

1 *■ 


»a|93 | *02 

• 10078-»09 

•19S17-01 

•50166*09 

•19929*09 




t 

|9 input " CONTIN 

.1693^*00 
-•81.931 *02 

,00000 

— • 10Q78+O1 

• 10l00*u 1 

•J9517-PI 

•QOODO 

•uoooo 

.19929*0* 

•39853*09 
ti 1519*01 

•OOOOO 

0 

I 

20 Input • Contin 

• 173^B«^0Q 

_t0D0f0 

*10100*01 



f OOOQO 

* *00000 

•39853*09 

eOOOOO 

0 



•01931*02 

.10074*09 

• 19517-0 1 

•50146*09 

•19929*09 

•11919*01 



* 

21 input • contin 

• l82S7*0tl 
..}8{93|«02 

•UOUOO 

-ill PO 7 6 +09 

• lOltiO+01 
_ii95i7rPl 

•OOOOO 

.50166*09 

•UOOOO 

.19929*09 

•39853*09 
.11919*01 

•OOOOO 

0 

} 

THE Mass plow RaTc is « 

•170973*03 








f 

f 



NOhENTUH iNTEriRAtlUN 

Eofi^ex EflWCEl 

RESULTS 

TOflUZ. 

ISP 






« t 

33^^1+05 

tOOOCU 

•OOOOO 

.19796*03 




• 


o 


NOTES: (1) Tjrpical printout for the nozzle throat startUne data surface- 
(2) Some points have been omitted for demonstration purposes- 
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Table 3-8 (Continued) 




SlPcRSOMIC fLOS analysis OSlfJG The LOCKHEeO-HUNTSVULE UMLIIPLE smock computer program 

_ . ^ _____ J ^ . 

"gaseous" check CA* E with free MOteCULAR CaLCULA f 1 0 N rTonTi O erc 0 " ~ 


LINE POINT OSCRtP - RiGlHE 

._..I0_.. ai _»AE E * C CMTlN 

n i RALt - CCHTIH 

._l l 11 — SAU, ^ COHIJh. 


CONTIN 

Co nti W_ 


I MALL - CONTIN 

?A— 1* M. - C ONTIN 


,1N I »aLL ^ CONTIN 

|N 2i WALL ~ CONTIN 

1 

T5 I «ALL “ CONTIN 

«|5 21 RALE * CO NT IN 

T5 I MALE - COVTIN 

16 21 RAlc • CO'ITIN 


_HACH.^GLE pressure.. 


_*.»B27.L*0O_ 

• 6<tS‘t2«02 

•06000 

_»BiS31*02_ 

_iie?7!i+Qa. 

•63705*02 


•OOOOu 

-*BlT31*aZ. 

_.|8277*0Q_ 

.62?2S*02 


.UOOQO 

_.QlfJt*Q2_ 

_• I I tOO_ 

• 621 9<i*02 


•OQOOO 

» 18285*00 

• 6 1 50b*02 

* 

•uoaoo 

_} 1820 9*00_ 
•60SS2+Q2 

•00000 

_i8j?3i*g?_ 

1 1 8293*0 0 
•60233*02 


_i’’lS&-02- 

,»0099*03 

,11687-01 
— *1007iS 

I0T72-0U 

■ G9256'^(13 


I 12BI2-U1 
-*10076+08- 

i 2022"U|_ 
•88838*0] 


•l3977-0( 
_• I 0076*08- 

_».!3Q65-01 , 

•87699+03 


•16181-01 

_»J0U76*g8 . 

-•J1102-PI.. 

•86870+03 

.*6306-01 
_jJ 007 6*01- 

_• -LS I 32-0 1_ 
•861 tS+03 

.17871-01 

-.10l)T6+08_ 

•l 6 lS6-gj_ 
.85378*03 


H 

-D£NS11.T_ 


n07S*Pi. 

13229-01 


•loiao^oi 
_• l«*Sl 7-01 

•OOOOO 

♦SOI66*0.8__ 

•OOOOO 

. 19928*J)S 


■OOOOO 1 

.*11 158*01 

.17219+0I_ 

•UQOOO . 



*36189*08 

-_ «OOODO 3 

•13126-01 

•8^180+08 

•19910*08 

•11987*01 



>18617«Q1. 
I M230t9L. 

•13026-01 


•l010D*0i 

il45t7-gi_ 

lU 305*01. 

•12928-01 


10100*01 

18517-PI- 

H378*0l_ 

12839-01 

10100*01 

J9Sl7-0|_ 

i.‘•50♦0l_ 

12781-01 

10100*01 

i8Sl7^|_ 

1 is;;o+pi_ 
126S0-b| 


theta 

EHP.ERAIURE. 

-1 1 5560+0 L 

•89266*08 


ENTROPY 

Gas const. 

.0 0000 

•19911*09 • 


VELOCITY 
>OCAL GAMMU 

tl.7?P6*q^ 

.11988*01 


PAGE 9 


0/F ITR 

.^-Olk. angle, 


..—•OPPOO. 


— •S0166*04- 

-i 10.867*01, 

•89106*09 


•OOOOO 
-.50166*03. 

•20505 *01 

•99039*09 


•OOUOO 

_6&816fc*ttjL 

-*22!33+gi_ 

*98963+09 

' •OOOOO 

_*5ni66*0fL 

•23/5 1*01 

•98893*09 

•OOOOO 

_*2536q*0L_ 

•98829+09 


•OOUOO 
-6 19929*09- 

-lOQUOO 

•19910+09 


•OOOOO 

jJ9«28*aS- 

-illOPOp 

• 19909 + 09 


•OOOOO 

-«19929 *a9_ 

-i 00 000 

• 19908*09 


,•000011 

• 19907*09 

•OOOOO 


,•00000 

•19906*09 


*39863*08 

-.11918*01- 

-•3.8 38S+P.8. 
• 1 1989*01 


.39853*08 
_iJ 19.1.1*01- 

-•.38 6 16*08, 

•11951*01 


*38863+08 
-«JXf 19+01- 

-•3§B3«+01_ 

•11958+01 

”♦396^3+08 

jJl9l!*+0l_ 

•39 057 +08 
•I 1956+01~ 

*39653*08 

jixai9+Qi_ 

.39272* 08 

*11958*01 


•OOOOO 

_»opoop 


•OOOOO 

•ooono 


•OOOOO 

-iPQPflO- 

•00000 

•OODOO 

•OOOOO 

•OOOOO 


NOTES: (1) Typical printout for a data surface inside the nozzles. 

(2) Some points have been omitted for demonstration purposes. 
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Table 3-8 (Continued) 


reproducibility of thk 
PRIGINAL PAGE IS POOR 


i»UP£fi50hlC FLOW ANAutSlS USlNa THE LOCKHECO»HUKTSV1 Li.C HULTtpLC SHOCK CWfipUTEB pBObRAll 


CASE KO, 


(iASEOUS check case WITm ’free molecular calculations COM3|6tRED 


POINT OSCKIP - RE&iKE 


_MA4ll,^W(iL£. 


pRISSURt 


I WALL ...V^QNTJN 100 000 ,30Vn0*0l 

.|3752»02~ ’ .NTytZrUl 


2 - CONTlN 




H INTER - CONTlN 


s inter 


CONTlN 


INTER • CONTlN 


7 inter ■ CONT lN 


a INTER - CONTlN 


’ . int er - CONTlN 


10 INTER - CONTlN 


■ *♦9924-01 

_»L325A*0i. 

_j99B57 -QI 

•|37S¥«02 


• l*|97b*Q0 


« 1 99Sa»00 
• 13763*02 

»2*4933 + 0O 
« I 37fc¥*02 

»299oi»0o 

*13774*02 


*i*<BS4*ao 


*3aa96*Qi 

_».iaQA9*0L 

.^laaaStaL 

.4aj24*0I 


.30867*01 


*30a *<2 *01 

«*«82SS*0I 

.30810*01 

..4-B3*|9*9L 

_.3o770*OI. 

,4a470*lll 


. PCNS1T¥ __ 

.*n9p3*0J 
. ia9‘i><-63 

• 8 1890*0 1 

-•±1.883*01 

•18998-03 


•8|87A*0i 

_».1±QI2-P3— 

.81 867*01 

• l90i6-03 

•81BS3*01 

-il9.06A-pj_ 

_•_*♦ 1880*01 

• i9l01~0-* 


.3o728*U1 .81820*01 

.8j 1632*U1 tl9iSlr03. 


theta 

-lEKElMiy.^ 

• 00 000 

. 18802*08 

.82763*00 


.16 &S6* 01 

•18814*08 


•28810*01 


.3302 7*01 

.18827*08 

.81195*01 

_*1«83S*!J±. 

.8 9296*01 

. l888'’i*U8 

.S7300*U1 

-.jtisBtoa. 


entropy 

OAS COr.; 

.OOQOD 
i 19811*08 

•00000 


.•liOOUfl 

• 19«U*08 


.39790 *00 *30671*01 •81798*01 •8%l78*s)l_. 

• 13790*02 (88887*01 .19217-03 .18875*08 


•00000 


_.00000 

• 1981 1*08 

•UOCOO 
•1981 1*08 

_iogooo 

•19811*08 


•UOOOU 

-Al21LU*flil 

-•BflPOQ 

•19811*08 


II INTEl 


CONT lN 


12 INTER • CONTlN 


13 inte r * CON TlN 


.88706*00 

_ujfia3«a2. 

..189595*00. 

• 13819*02 

•58851*00 

_*J-388J*32 

-l&??69*00. 

.13870*02 


.30612*01 

89131*01 


•81759*01 

.•i»3o5-aa_. 


•72a91*Ul 


•DOOOU 


-*1 88984 an U-9 81 1 A.OJ 


__.50S86*oI •81?1.3*0|.. 

.89509*01 *19822-03 


.30878*01 

..Sl}Ql7*0i 


•81552*01 

.jas522.-ei. 


« 80382 *01 
•18529*08 

.87570*01 


..48fl397*ai .8|S71*P1 j9837Q*ai_ 

.50696*01 *19786-03 .18628*08 


-tOOOOO 

•19811*08 

•UOOOO 


-_iQPePO 

*19611*08 


VELOCITY 
.OCAL 6AHHA _ 

•’08I«*08 _ 

• m7i*oi 

.9081 0*08 
-^127?I*01 

„.l2a80S*08 

•12770*01 


■9q8CI*08 
-.ilL222Q*OJ 

__.9Q3«*p8 

»Ti770*0l 

.90388*08 
*12725*111 

.90378*08 

.1278’*01 


*90365*08 
- tl27^g*01 

.9 0389*08 

•12768*01 


•90326*08 
— tl.27A2*al 

*9 0297 *08 

•12765*01 

.90258*08 


.90206*08 
* 12761*01 


0/F ITR 

.A.N4L£ . 

•00000 5 


•00000 


•00000 


■OqOqO 


>00000 


•00000 


•00000 


•ooooo 


>00000 


•ooooo 


2 fiJisoa_. 


•ooooo 


NOTES; (1) Typical printout for a data surface at the nozzle exit plane. 

(2) Some points have been omitted for demonstration purposes. 
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Table 3-8 (Concluded) 




SJPehSONIc PLOW analysis 

^ USING the Lac>^HtEO-OUNTSVlLLE HULTIPLE 

shock computer 

PROCiRaH 



t 




CASZ NO. 

i 




PA«e 39 


LINE 

GASEOUS CHtCK CAiE HllH 

FREE molecular 

Calculations 

CONSlDEItEO 




t 


f'O INT 

• Hj.GIKE 

H 

hacm ANt;J*£ 

X 

_pRESSUHt 

rt 

densi f r 

THETa 

TtHPERATUKE 

EnTROPT 
bAb COhST. 

vELOciiry 

LOCAL 5aMHA 

0/F 

shock angle 

Ttr 

ID^ _ 

22 

PHH^kR - CCNTIN 

■IQOCO+Ol 

. ■3o9&7+a 

.49 674 ♦01 

,19590*02 

• 00000 

.92063409 

• 00000 

5 




. 1267&*Q2 

,29373*01 

• X 2902-03 

* 165224^09 

•19811+09 

,12358*01 



i 0 o 

23 

HHN-mH - CONTIN 

• t00(>U4>0t 

• I I&674^Q2 

.30967401 
_♦ 12807 + 0] 

•99873+01 

.68919*09 

•29160+02 

.13691+09 

, .00000 
. 198 j 1 +09 

•93669+09 

• 130 1 1 + 0 1 

■00000 

5 

I06_ 

2^ 

PHH-hH • CONTIJI 

i 10000*^01 

#309B7*OI 

•59319+01 

,26773*02 

iODOOO 

,75069 + 0*' 

•00000 

5 




« V70bi*0j 

*3] Afit^OO 

•239S2-09 

•96163*03 

•19611+09 




10^ 

OJ 

2S 

PKN-mR - CONTl'l 

. 10000*01 
|68272tU| 

,30987+01 
., !6i>73*OQ 

•6S \ 6S+D1 
. l9i63-09 

•33J&0+02 

^,635|2*Q3 

•00000 
.1981 1+0«1 

,V&339*0S 
, 1 32 1 0 + 01 

*00000 

5 

t >0 

26 

P H N • h R _T„C 0 tj T lii 


_»^0987+Cl 

__.720b3+0| 

.279SI+02 

•OGUOO 

^i’,7H65*a‘f 

*00000 

h 

_ 106 

27 . 

-Pk«“mR :^_ctjN.ii»J 

•797H3+01 

«!00nG+0l 

.7eiH3'-0l 
,,30907 + 01 

.8 J 3 1 9-Ob 
•io^i2^oi_ 

.67807403 
.92591+02 

.1961 1+09 

•onooo 

*l32!0*0i 

*96527*04 

•ooodo 

s 


' 


• 7 J HJB + Ol 

.34692-01 

#93957-05 

.57365+03 

•19611+09 * 

,13210*01 



10« 

2B 

PKN-mS “ ClIKTlN 

• lOPOL'*0 1 
«63327«Ui 

« 309e7*U 1 

U972-01 

,9o6trl*Ol 

a 22 UBl>ab 

,97131*02 
,S5?9 1 *03 

400000 
.19811 +D9 

,99463*04 

,1:1210*01 

•oooou 

5 

106 

29 _ 

f'?H!r»i'i-i_coNxjN 

•lOUOO^OI 

_,30987*Ut 

*1036 1*02 

iS172j*u2 

fPOOUp 

iJ (iu30*q5 

__ . 1 00000 

s 




■55383401 

.H9H96-02 

• 10l2C*05 

,35602*C3 

,19611*0S 

•13210*01 



IP6 

30 

PHN*hR • CONTiN ' 

•lOOOL+Ol 
.87583*01 

•3d987*0I 
.« t52lS-02 

•I205b+02 
,iU2i^rQ6 

• 5631 i+q;i 
«26ti33+0i 

■00000 
• 1 9 8 1 1 +0_9 

* * 10l02 + o5 

•00000 

5 

*o*„. 

31 

PHN-H^ • CD^TlN 

* I000lj40t 

_£_3p9e7+0! 

.19370 + 02 

j609pj +02 

400000 

•-• A WT U 4 - ' > 

,10164*05 

•00000 

s 




•3990B4C1 

*37697-03 

•IS332-06 

t tY] 17+03 

•19811+09 

*13210*01 



i 06 

32 

PRM-HR •• CC ^7|N 

• 1 ocno*oi 

.32328*01 

, 3 d 9 B 7*01 
m. 695 Sl-OS 

. 17735*02 
_.J 9373-07 

,&bS 9|*|)2 
.a 2429 * 03 __ 

•aODDO 

— *jg«ii*os 

• ta 2 1 6 +qS 
_aU 210+01 

•00000 



NOTES: (1) Typical printout for a data surface contining a Prandtl-Mejrer Expansion. 
(2) Sonne points have been omitted for demonstration purposes. 
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hjxample Problem 2 

Example problem 2 is a cotiiinuation of the Qowfield analysis begun in 
example problem 1 and is subject to the following stipulations: 

1. The analysis is to begin at the nozzle exit plane and is to 
utilize the startline generated by example problem 1. 

2. Free molecular calculations are to be considered, and 

3. The gas properties are to be read from cards. 

Table 3-9 presents first a flow chart and then a listing of the input data 
for the specified problem. Table 3-9a presents a listing of the pertinent 
solution. 


P 



'5 

® si 


I 




I 
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V. 


Table 3-9 

REQUIRED INPUT FORMAT FOR EXAMPLE PROBLEM 



If gas properties are input on tape (ICON (1) =2) Cards 9, 10 and 11 are not 
required. 
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fcinafteK> fciUtisaSiMi J fW g f**? ! ^ :v ,* itfwa- . i^ ya . » a tw 

»TiEr=W# ivWSffiKpf fia u UI L^i 


Cards 

1-3 


Table 3-9 - (Concluded) 

L>«bLvjUi> oHc-CK Cm^!h lUITH FKlE I'lOLt-CuuAk CAi_Cui-A T I CoInSI UIlkED 


Card 4 


1 


2 1 

1 

2 99 

1 11 1 

OOluO 



2 1 




•26794919 • 1 6909306 1 3 ♦ 09o6o 


Cards 6 { 


3 

• 0020 




* lOOO. 


Card 7 


p 





1000. 


Card 8 


iDLAi_ GmS 



ENG 

1 1 



Card 9 


• O 







Card 10 


• 0 


iJ 







• 0 


1. 1798 

b4t)tJ .4 

122^.46 




1 

1 • 0 

24 •‘^46 

1 . 191 1 

bOiib . o 

69.321 




1 *7^0 

Hbwuob 

1.4 121 

4^^V.O 

£i4.496 





2b.0b0 

1,2224 

J747.6 

12.246 



Cards IL 

1 

Z«bj>6 

2b. 069 

1.2497 

3299.4 

6.1241 




L 

£•916 

2b,09l 

1.2344 

2b96.2 

3.0621 






2b. 091 

1.2376 

2430.0 

L .224b 




^4 •Ob 7 

2b. 091 

1.2731 

1931.4 

.4083 




^ « 3o4 

2b.0'^l 

1 . 2819 

17c;;y.b 

.2450 




,4, 7VO 

1 

1 . 2944 

14tU .4 

. 1 225 



1 


^ .UOOOOOO 

. 

32323o6+0 I 

• 4£:;bbb6o+0 1 

.OOOOOOO 

.ooooooo 

•ooooooo 

Lk) -- 


,3 i V7684 

-0 1 . 

323i9':'2 + 0l 

• 4^b4 1 4G + 0 1 

.6249443+00 

•ooooooo 

•ooooooo 



• 1 /+00 • 

.3230869+0 1 

• 4cibo3bD+0 1 

. i obOo i j-hO 1 

•ooooooo 

•ooooooo 



• 1 :jjbbv3i9 

+ 00 

3229000+0 1 

• <*2b246o+0l 

.2472640+01 

•ooooooo 

•ooooooo 



,20 7 /66V+00 • 

322o36>+0 1 

*4dibl J4b + 0l 

#3290727+0 1 

•ooooooo 

•ooooooo 



, i^6Vb'33 v+00 • 

322304J+O1 

• 42:^^9e9 1 +0 1 

• 410,j0'‘->3+01 

•ooooooo 

•ooooooo 



.-3112162+00 

321 0973+01 

• 424 7967+0 I 

.4907012+01 

•ooooooo 

•ooooooo 



.3627149+00 • 

3214193+0 1 

*424^4 lb + 0 1 

•b699432+0l 

•ooooooo 

•ooooooo 


Cards 19a 


A lAOCa:::-+CO 
't6o0AS':^+00 
U i b7C>7L»+C0 
-j£'60 75b+00 

o lbd7l '=»+00 

o630d2 1 +00 
713718J+00 
/Cj1Uv34+00 
tio'3'7b4t»+00 
tib74d2t*+00 
V04^jici70+00 
wb24623+C0 
1 000000+01 


J?Do73*; + 0I 
320-^^^j'ia+Ol 
.31 90830+01 
31 tf 84? 1+0 1 
3 i805'^8+01 
31 { •;2’3 J+O J 
31 6 34l> J + 0 1 
o 1 t)4l o 3 + 0 1 
ol 44333+01 
31 339J 7+C I 
0123849+01 
J1 i i 1 44+C 1 
3 o9o 7 + 3+C 1 


Card 20 

100. 

-100. 

0.0 

Card 21 

ll.C 

t . 

1. 

Card 22 

1 00*0 

bC. 

2 j • 


. 42420bo+0 1 
,4237622+0 1 
, 4/;3 1 737+0 I 
. 424 JVb 1 +0 1 
,42141 27+0 1 
,4203162+0 1 
,4 1 Vo 167+0 1 
,41 obdO 7+0 1 
, A 1 o 1 1 bo+0 I 
,41 /6634+0 1 
,41 770bV+0 1 
.41 76300+0 1 
.4 1 7o70 1+0 I 
0»G 
,006 
1,0 


,6476VbV+0l 
,7234468+01 
,7y64bV9+0i 
,86bdbbV+Ol 
,V012o4b+0l 
,yV3v677+0l 
, 1087622+02 
. 1 126106+02 
. 1 lVo677+0<; 

. 1270V62+02 
, 1346748+02 
, 1423164+02 
. 1500000+02 
20* 90* 

b , • b 

8.0E-04.7 


0000000 

0000000 

0000000 

0000000 

ooooooo 

ooooooo 

ooooooo 

ooooooo 

ooooooo 

ooooooo 

ooooooo 

ooooooo 

OOOOO'jO 


•ooooooo 

•ooooooo 

•ooooooo 

•ooooooo 

•ooooooo 

•ooooooo 

•ooooooo 

•ooooooo 

•ooooooo 

•ooooooo 

•ooooooo 

•ooooooo 

•ooooooo 


itoa*!5v.3mii , j 


' i ’3--' jfe'-i'-' i:i ;6: .‘J Lj'.'LSK,'. 


> ' 'r'^r' i'-i Vir i ' ' r’^Tr i fr i^i i lii rt iV trtiii ri iiiii v] i .2 12^.: 
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Table 3 -9a ^ 

EXAMPLE PROBLEM 2 PERTINENT SOLUTION 


13 POOB 


SUpeRSONIC FLO* AMAtTSIS UStuG TNE LOCKHEEO-HOMTsVILtE «OLTIpLC SHOCK CoNPWTER pRofiRAM 

rASE NOo 1 

GASeOOS CHECKCASt WITH r«EE MOLECULAR CALOiLATIOnS CONSjO£RED 


tCOMf 1 } 
1 

ICONI?) 

o 


ICONI2) 

2 

ICON! l6) 
99 


TCON(i» 

21 

KONIf 1) 
1 


RUN control parameters 
ICON'H) tCON(S) 

2 1 


ICONI12) 

I 


ICONl ] )) 
L 


|€0Nt6| 

0 

lC0N(i«O 

0 


1C0NI7I 

I 

ICONi iSt 
0 


ELO« calculations are in ENGLISm UNITS »ITh ThE 9»X COORDINATES |N FEET 
The FLO* FIELD DaTA SILL NOT ARTTTFN ON TAP^ 


ITRANS 

I 

0 


ITRANS 

0 


oOOnOO 

•20QQO«n2 


A 

oOonno 


•OOnOO 

•OOnOO 


A 

•OOnOO 


UPPER 60UNDART 

c 

• POQOt} 

.00000 

tOREP 80UN0ARY 
C 

*00000 


t2679&9f)0 

•00000 


0 

•00000 


»|69A99Q0 

*00000 


E 

•00000 


THERE ARE 0 PARtIClE SPECIES PRESENT tN THE GA5 *PARTIClE fllXTURC 

The FOLLORING gas PROPfRTIES in ENGLISH UNJTS ARE FOR IDEAL GaS 

REAL GAS properties 

0/F 

«ODOOn 

5 V R GAHHA T P 

• 000(10 


ICONCBI 

2 

1C0NU6I 

too 


HAA 

•30969^01 
• IOOOOaOR 


NAA 

•lOOOD^OR 


V 

n 

GAHHA 

T 

P 

PR 

VIS 

CP 

•OQOOO 

•9001 4^01 

•11798*01 

•89489*09 

- *18000«0^ 

•00000 

•OOSOO 

- •aooeu 

• 3<IS36«01 

• »V»2S*0«I 

•11911*01 

• 802Si>*09 

•i0la7»OR 

•00000 

•00000 

«000D0 

• &574««0<l 

•IVO^O^OO 

•17121*01 

•92390*09 

*3S999^03 

•00000 

•00000 

•00000 

*4<iais«o«> 

• '•9R20409 

•17229*01 

•37974*09 

•ia00D*03 

•ooooc 

•00000 

•oooco 

•7|902«Ca 

•I98I2909 

•l?297*0t 

•32999*09 

•90000«02 

•00000 

•00000 

•00000 ' 

■77*0S^09 

• jl9«l 1«Q(| 

•12399*01 

•28942*09 

•RS00l«02 

•00000 

•00000 

.00000 

•83S77^09 

• 1981 1409 

•12374*01 

•29300*09 

*ISOD0«o2 

•00000 

•00000 

*00000 

• 8fS<>3»09 

•19811*09 

•17731*01 

•19319*09 

.6000^901 

•OOUUO 

•00000 

•00000 

• «i*l4a«09 

•19811*09 

»l?8f *0* 

•17278*09 

•360QSAQI 

•00000 

•00000 

•00000 


LswP?iSi 4 f 
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cicsjcittu^ 4<wiw»^^ 
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Table 3- 9a (Continued) 

t 

SUPEftSONIC FLOW ANALYSIS oSiNfi THE LOdCHEED-wUNT* VlLut MULTIPLE SHOCK COMPUTE* P«0fiR*l1 


rAS£ NO. 


OASEOUS check case *|Th free HOLECUCA* CALCmLATIONS CONStOEREO 

REAL 6aS properties 

M-TOTAL 


S 

>00000 


.933A|«0R *129HR«01 •tKal*t*o‘l •iaoOA*Ol *00000 



n 


H 

tmeta 

5 

MACH ANGLE 

SHOCK angle 

0/f 


*00000 

•3232S+01 

•N2S5S*nl 

*00000 

•ooopo 

• 1359 1*02 

.00000 

•ooooo 


*&1977«01 

•32370+01 

«‘<26<||*n| 

■ a2<«9s+on 

•OOoOQ 

•13595*02 

•00000 

•ooooo 


.410396^00 

•323n9*oi 

>N2S33*n| 

• 1AS03*01 

*00000 

• 13598*02 

•00000 

•ooooo 


• 1SS90*00 

•32290*01 

«N252H*nl 

•29726*01 

•OJOOO 

• 13601*02 

■00000 

•ooooo 


*20777*00 

•3?2AS+ot 

.<I2&I3*A) 

•32907*01 

•ounoo 

.13605*02 

•UDQOO 

•ooooo 


*259&5*oO 

r3223C*01 

*‘>2*<9e*M| 

• 4l03l*CJl 

•ouooo 

• 13609*02 

•oooco 

•ooooo 


till 224>on 

*32190*01 

*N2<t79*nl 

•4907r*Ul 

• OU^iOO 

• 13616*02 

•oaoQo 

•ooooo 


• i627 1 *ut> 

•321S2+01 

*H2*l5‘)*nl 

•S699S*Qt 

*00000 

•13624*02 

•ooooo 

•ooooo 

t 

*9 1 SOI ♦on 

.32087*01 

.•*2N20*oI 

•64770*01 

• ooor-; 

• 13635*02 

•00000 

•ooooo 

*H6^CS*00 

* 32076 + nt 

,<*2376*nl 

« 723S5 + 0 1 

•OOQQO 

.13649*02 

•ooooo 

•ooooo 


• 5 lb77*03 

• 3 1 9 ti 0*01 

.*I2317*A! 

*79A46*0I 

•00000 

.13669*02 

•ooooo 

•ooooo 

65 

*bi60& + ijo 

*3 1 

.<<2239*01 

• 86586*01 

•oodoo 

. 13695*02 

•UOOQO 

• liUDOO 

« 6 1 b6 74 -uO 

• 3 1 floA *0 1 

.<i2im*nl 

.93123*01 

• OtJOOO 

R 13727*02 

■ooooo 

• uoocio 


• 08*UO 

• 3 1 773*-Ol 

*H203l*nt 

.99397*01 

•ooboo 

• I3^64*u2 

•oouoc 

•ooooo 


■ /! 372*f)0 

•3I63&+01 

.*<1931*nl 

• 10576 + 07 

•ooono 

.13797*02 

. ooooo 

•OOOOO 


f 761B9400 

•31592*01 

• <<tSS8*nS 

• 1 1251+U7 

*00000 

• I3b22-^'i2 

•ooooo 

•ooooo 


* ri097S + 03 

*3] HS3*0I 

• <liei2*nl 

• 1 1 967*07 

• DCtOOU 

• 13d37*02 

•oouoo 

•00000 


•8&7S2+00 

*31 339*01 

.<(l78S*nt 

•12710*0? 

*00o00 

•13646+02 

• ciQcao 

•OOQOO 


•90499+00 

•3l27B*ni 

•Hl770*nl 

• i3s67*o? 

•oonno 

•13U51+02 

•OOuUO 

•OOOOQ 


•9B2S6400 

•31111*01 

• <il763*nl 

• 19732*02 

•OODOO 

•13654*02 

•COQOO 

•OflOPO 


• 1 Q00040i 

• 3nTA7*OI *<il757*nl 

UPPER. ROUNOaRV 

«isnoo*o 2 *ooona 
RUN CUTOFF information 

•l385A*a2 *00000 

LONER BOUHOARY 

•OOOOO 


RR *10000*03 XR •* 10000*03 

VIBNO 

JHZlAm 

noiHo 

*00000 

TRANNO 

RR *00000 Xr 

CHARL 

•20000*02 

GAHV 

thcta* 

cahr 


•10000*03 •50000*03 

The hesh construction rill be 

•20000*02 

CONTROLEO.BY 

•lOOOOROl *00000 

THE following variables 

•ooooo 


QL tNTCKlORa *300+01 

e« AXIS* • 

100*01 nL 

lirr •ton*oi 

OL deleter 

*500*02 

DCO P.M+« * 

500*01 f 


•90000POZ 


iSOOROO 
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Table 3 -9a (Continued) 




SUP£«50m1c plow analysis 

USING THC LncKHECD^HUNTs 

VILLC KULTiFLC 

Shock cOhputeR 

FROCRaN 


* 





rASE NO. 

1 




PAGE 6 



caseous check case HITh 

f»ec holeculaR 

CALCULATIONS 

CONSlDCHCD 






t IME 

>*0 InT 

0Sc«lP ^ RCftIrtE 

R 

X 

« 

THETa 

entropy 

VClOCTTT 

0/’ 

itr 




HACM ANGte 

pre«;sure 

DENSITY 

TEHPERaTURE 

Gas const. 

LOCAL OAFHa 

SHOCK angle 


J 


• CGFiTfN 

•6a508«00 

•31723401 

•9?03t40l 

• 99S97«>al 

•□oooo 

.90999*09 

•00000 

0 





•M69&n*QJ 

•16630-03 

•ISSIS^OH 

•i»eii4pH 

•12775*01 



1 

1& 

INPUT - CONTIN 

♦71372*00 

• 3U3540I 

•91931401 

•10S7A*02 

•OOOOQ 

•90936*09 

•oocco 

0 




•1>797^02 

•97737401 

■ 18679-03 

,1S3B4«0M 

• 1981 1^08 

. 12772*01 



1 

1 6 

Input - contin 

*7^189^00 

• 3|c,92401 

•9 1 886401 

•11251*02 

•00000 

.90389*09 

•ocooo 

0 




.lTa22>02 

«9ai2740l 

■19097-03 

.18933*09 

•19eil60H 

•12770*01 



1 

17 

INPUT ^ CONTIN 

•8n97b*0C 

•3 1 U934Q] 

•91612401 

.1 19&7*02 

.00000 

.90360*09 

• ooco:r 

0 




*13837402 

•98701401 

■ 19172-03 

• 18963*09 

•19611409 

•12768*01 



1 

IS 

Input - contin 

•85792400 

•31T39+01 

•91785401 

.12710*02 

•uoooo 

*90393*09 

400003 

c 

uo 



• M896*02 

• ^ 391 7401 

• 19239-03 

.le9Q|*0q 

• 1961 16(38 

•12768*01 



tv > 

19 

INPUT • CONTIN 

•9n999*QC 

•3172B4Q1 

•91770901 

.13987*02 

■oocoa 

.90339*09 

•OOCCO 

0 

o 



•IT85I40Z 

*99038401 

• 19276*03 

•16991*09 

•19811409 

.12767*01 



1 

20 

Input » cdntin 

•952SA400 

•31111401 

•9t76340£ 

.19232*02 

•ODOOO 

.90329*09 

•QOCOO 

0 





■99; TQ401 

•1929S-03 

• 1 8<(96*aH 

•19611409 

.12767*01 



t 

2! 

INPUT * CONTIN 

*]n0304Q| 

■30989401 

•91757401 

• tsooo*o2 

• 00000 

.90325*09 

•OOCQO 

0 




.1TBSA4Q2 

•99 1 H9401 

•19309*03 

.18999*09 

.1981 1*09 

•12767*01 



i 

22 

- C0NT1N 

• tfl0fl040i 

•30989401 

•95096401 

.19889*02 

.00000 

.92 165*0 9 

•ooooo 

0 




•1?8I2^02 

•2B776+01 

•12593-03 

. I«38B«0<| 

•i96ll«09 

•12«65*01 



1 

23 

PKN*kR - CONTIN 

• inO^O^OI 

•30989401 

•991 19401 

•297S0*02 

•DOOOO 

•93808*09 

•QOGOQ 

0 




♦ n747402 

• tb76640l 

•77372-09 

.19297*09 

«19ail409 

•12999*01 



1 

2** 

PRN-hR ^ CONftrl 

•loQon^tn 

•30969401 

•53333401 

.29629*02 

• 00000 

•95999*09 

#00000 

0 




*lOflO7^02 

•8SX63«00 

•99631-09 

.12602*09 

•19611409 

.12999601 



1 

ZS 

PRM^kP • CONTIN 

« tnQ0n4Ql 

■30069401 

■56196401 

.39999*02 

.00000 

.96909*09 

400000 

0 




*99026401 

•99768400 

•30661-09 

.10899*09 

•19611409 

*12999*01 



1 

2i 

PHM*kP - CONTIN 

* tnOOU*Dt 

•30989401 

.63717401 

.39379*02 

•00000 

.98375*09 

•OOOOO 

0 




•9029^^01 

•23797400 

■ 16139-09 

•92VSS903 

• 19611409 

t 12999601 




NOTSS; (1) Tjrpical printout for a startline data surface containing a Prandtl-Meyer Expansion. 
(2) Some points have been omitted for demonstration purposes. 
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lIXSgSIKSiS^ 

fcsrrRJilt 


^gJBTaTKH 


^r a a trj- T i 




<f'''^T^Ii^^ 


«i«NUSlC£l 

la^eaftxvi 


fR « »WWC t 

KiiSSCRC^ 


f ttw ani f msarn^ 

*jse*K3 


Table 3 -9a (Continued) 

suPtHSONjc flo»p analysis using the lockmEeo-muht.villE MULTirLC Shock computer progsah 


rASC NO. I PASt 12 

gaseous check case aith face HOLecuLAR Calculations considered 


1 1^£ 

point 

OtiCHtP 

* KE&inE 

R 

X 

H 

theta 

entropt 

wllOcity 

C ' r 

ITN 





NACH angle 

PRE«i5URE 

density 

tcnperaturc 

GaS const* 

LOCrtL GaP'-A 

SMOCK A'»<*w£ 


t 

2T 

iNTtrt 

- CONTIN 

• |n613«0l 

•31*27*01 

•71067*01 

•4H25**02 

•uoooo 

. I971«*D*> 

•OOOOO 

1 





» Rn8B94>0 1 

• l0n8S*00 

*9SlR6-0b 

•76883»03 

•19811*01 

•1299N-0I 



2 

2a 

1NT£H 

- CONTtN 

*lOt»Sh*nt 

•31756*01 

•790B5*0l 

•19073*02 

•OOOOQ 

.1009S*Ob 

•OOCOO 

1 





*726H1«Q1 

•R3^3R-0I 

• «196DM-05 

•63535*03 

•19811*01 

.129NH-01 



2 

2» 

iht£r 

* contin 

• 10753«ai 

• 3l A80*0l- 

«erll39*0l 

•53898*02 

•OOOOQ 

. IO1V9-0S 

•ooooo 

1 





• 6>(62b*01 

• 17 7 3M-CU 

• 2s.733*0b 

•51393*03 

•t9«|l*Ql 

. IZ9RR-01 



i. 

30 

INTCR 

* CONTIN 

» inRl240l 

• 3lc;99*Ul 

• tnl00*02 

•58729*02 

•OOQGO 

•ICZ92-0S 

•OOOQO 

1 





»&a 81 %^ 0 I 

•60n27-02 

•10777-OS 

•10186*03 

•19811*01 

. izvna-oi 



w * 

31 


• CONTIN 

«inSl>H4>01 

•3l8lS*0l 

* 1 1 6oi>*02 

•63566*02 

•UOOOO 

tl03?3*0b 

•ooooo 

1 

1 

fVk 




.R9l7^^0l 

• 1 at 3A«02 

• *27*ta-06 

•30837*03 

• 1961 l*Ol 

•I29M9-0I 



INJ 

32 

Inter 

* CONTIN 

• 1 n9aa«fn 

•3t427*Ql 

• 13757*02 

•6B1DB*02 

•OOOOQ 

■I0H93-0S 

•OOOQO 

& 





««1&7740t 

t^bn95^03 

*lNS67-oa 

•22170*03 

•19811*01 

. I299M-01 



2 

33 

INTCR 

* CONTIN 

• 1 t 

•31336*01 

•167oa*02 

•73251*02 

•ooooo 

•iqsoz-os 

•OoOoO 

& 





•39302*01 

•B5775-0R 

•*n*7o-07 

•15106*03 

•19811*01 

•I2999-01 



2 

3H 

Inter 

» CONTIN 

•ln97A*01 

•3l7NR*0t 

•2t 190*02 

•78110*02 

•OOOOQ 

•I0S99*0S 

•ooooo 

6 





«27032*DI 


•83055*08 

•96619*02 

•19811*01 

•12999*01 



2 

35 

FREChO 

^ CONTIN 

• in^B7*0t 

•31701*01 

•20633*02 

•77877*02 

•OOOOO 

■10S9S«OS 

■ooooo 

1 





•27780*01 

•13907-0* 

•992MS-08 

•10185*03 

«|981 1*01 

•12999*01 







POINT 

N0« 3* ON 

LINE 2 HAS « 

cen deleted 






PERCENT change in HASS, hOmeNTUH ANn ENERGY NUMERICAL INTEGRATION FOR LINE 2 RELATIVE TO THE STftR; LINE 
The percent change in Mass flow is ■ *.22naYt*oo 
percent Change in hohentuh is ■ .ib«ao«or isp ■ -.19527*01 

PEHCENT CHANGE IN ENERGT 15 ■ .00000 

NOTES: (1) Typical printout for a data surface in the exhaust plume. 

(2) Some points have been omitted for demonstration purposes. 


I 




ii&Ytii 










3-268 

LOCKHEED . HUNTSVILLE RESEARCH & ENGINEERING CENTER 


Table 3-9a (Concluded) 

SUPt«SONtc flow analysis USlWG The LOCKhEcO-hUNT.VILLE multiple SmOcX computer PR06«aM 

rASE NO. I 9A6E 21 

uascous check case aitk free molecular calculations CONStDEREO 


L \ Ut 

POINT 


REGIME 

R 

MACm angle 

X 

PR£«SURE 

H 

density 

Theta 

Temperature 

ENTROPY 
Oa5 const. 

velocity 
LOC^L GaK«a 

-V K 

SHOCK tvoLE 

ITR 

6 


INTE« - 

CONTIN 

S 1 l7l?«OI 
• S76St 4^01 

•3232N^Oi 

•47A28-D2 

•99553^01 
•1 i8t7-0b 

*57858+02 

*415<^9^03 

•OOGOO 
. 19S1 1+OH 

• 10262 + 05 
•12999+01 

•OODdO 

5 

6 

,^0 

iNTtR - 

CONY IN 

« 1 1 8 QA# 0 I 
• so7a44>{}t 

»32 1 S84^0I 
*2371 1-02 

• 1 1 297-*02 

• 525-8N-n« 

«622C64C2 

.32776+03 

• ooooc 

•1981 l+OR 

*10357+05 
. 12Y9H + 01 

•OCDOO 

5 

4 

31 

Inter 

CONTIN • 

*! I89O+0I 
.H396a^0t 

*3|9B74’Qt 

•71nS7-03 

•i303d«a2 

•2n727-06 

•66612+02 

•2N919+03 

•OOCOO 
• 1981 l^OR 

* 10HZ3 + C5 
•12999+01 

•CCLOO 

9 

4 


IN7LR - 

FREE H 

• 1 

«3tn2R4>0l 
•21 aSO-03 

•t2576^02 

•79166-07 

•693HH+02 

•20930+03 

•OOOQO 
• 1981 1+09 

« 109&O+05 
•16670+01 

•OOCOO 

1 

& 

i3 

TNTtR • 

free h 

. 1 7O13t01 
«3R7SZ4ai 

•31 aS6>01 
•H3a79-0R 

• 1 4785 + 02 
•2n778-07 

,7i3R6+U2 
• 15260^03 

•00000 
• i9bn+o«i 

* 1 On03 + ||ja 

•16670+01 

* u r G 0 C’ 

1 

6 

3 '4 

IiSTtR • 

FREE M 

•i?a73+ni 

•3t529*0l 

•3l4tS>0t 

*72497-05 

*iei62<*02 

*51737-06 

.76371+02 
• 10185 + 03 

•uoooo 

*1981 t+09 

•X0595+Q5 

•16670+01 

•OCLQT 

1 


percent change In mass, mohentuh and energy muherical Integration for lIne 6 relative to the staR^ line 
THE percent change in mass flow is • -.IGYRAT+O: 
percent Change in momentum is • ,iasBS*OR !SP ■ ••2ltG2*oi 
percent CHANcE ]ti energy is • .00000 


NOTES; (1) Typical data surface containing points in the free molecular regime, 
(2) Some points have been omitted for demonstration purposes. 
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Example Problem 3 . 

This problem analyzes a two-phase chemical equilibrium flow field 
with the following stipulations; 

1. Free molecular flow calculations are not to be considered. 

2. The gas properties are to be read directljr from a data tape 
mounted on FORTRAN unit 10. 

3. The start line is to be calculated internal to the program. 

Table 3-10 presents first a flow chart and then a listing of the input data for 
the specified problem. Table 3-11 presents a listing of the pertinent solution. 
Table 3-12 presents a listing of the input data required for creation of the 
thermodynamic gaseous properties data tape using the modified TRAN72 
computer program (see Section 2 for details). 
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Table 3-10 

REQUIRED INPUT FORMAT FOR EXAMPLE PROBLEM 3 


S:i 



The gas properties are input on tape. Therefore, Cards 9, 10 and 11 are 
not required. 
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11 

iil 


0 


P 


3 V 

II 


iJ 


II 


n 

1- 


i 





:-i i-- 

M 
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Table 3-10 (Concluded) 


r\> 

-4 


Cards 

1-3 


SPACE shuttle SEP MOTOR NOZZLE 


Card 4 

2 

25 

3 1 1 

2 6 

25 1 1 


1 0 

-i .0 

*15340277 0.0 

“1 .0 

- • 52224999 • 1 4672 1 05 

Cards 6 

1 1 

1.0 

5.1560945 2.1824232 -1.0 

-2,1796085.74059416 


3 0 

4.529 



1000. 

Card 7 

2 0 


/ 


1000* 

Card 8 

SEP PROP 

PC =1800 

MKS 

4 2 


Card 20 

1000* 

-1000. 

0.0 0.0 

100. 

. 90. 

Card 21 

• 03 

.02 

•15 .001 

6. 

.65 

Card 23 
Card 24 

•03805 


1 



Card 25 

• 1 

• 2 

• 2 .2 

. 2 

• 1 

Card 26 

1.1 

1.7 

2.5 3*2 

4.5 

6.5 

Card 27 
Card 28 

250* 

250. 

250. 250. 

250. 

250. 

Card 29 
Card 30 

AL203 £U, 

OF state 

lENG 



Card 31 

1 





Card 32 

AlOti.S 

1358.89 

1 o 58.72688 • 3400 1 6 

•32443 


^ , f SDATA Th10=30**ThFO=7**THJD=10**TH1Ws 

Cards 

16* «RRT=3 

• . CAPn= • 75 


1 151 


*13056333 




Table 3-11 


EXAMPL E PBOE LEM 3 PER TIN EN T SOLU TION 


SS1PCR5«)»»:C fuQ** AWft<.Vst 5 U SitiC the; L(ICKHEeO-HUNT5VlLL£ tlUtTlPLF SHOCK COHr^TEn PROCFIIh 

“ ~oAS^i‘»RTicCr 

• ' ' '' case ' wo , ■■,■ 1 . ; ■ ' v -. ■ . 


-tP^CE SHOTTt.C SEP HOTOH MOZEtF 


- R?»N CONTROL parameters 

: CONI Vi iCftiT{?> ico>rrsj ^itwiSTi" 

t..' ■•■• q 2 S 3 . ■ I 


nroNTAr 

o 


rcowm "-" — iCoMier ^ 


lemutv i::;'|CQN|itll ' ICQRMlI 1C0N<I2» icnNno* lCO«nR> ICONtisI icoNtlAl’^ 


rfcbo tntpjLAtidNS liiN^iTs "ifi tH x " TrfiO ) nrpaTrs~rrTEC 

fHE rl i t rJftvT DAVfl"> — “■• " " ; — ^ ' 


» v — 


ITRAfS 


-• rotjtic^^ni 
jjOonn -» •> ! 


TTsTiso^oo 

t^oood 


= TH"’UiJTODXl 

c 

*anooo 

e21 a?<*4QI 

^oboao 


•» Ip ^ DO^Ol 

""♦dobon 


r ^ 52 z 2 SVP 0 ' 


^ MAX 

-^NT$7Z«(n] 

;:« 79 aS 9 *aGi 

•. I ' OOlOO * ON ' 


ITRAA S 
a " 


_J_ A _ 

rO’nCG 


_ p 

'.do 000 


LOWER auUHpARI 

c , ;i'- 

.dbdod 


^ D 

>00000 


C ■ 

rcoooir 


HAK 

; rtocoo *' o : ii ~~' 


■ CT ' AmRER ERTHAl'PT 


'= 7 Tsi ^ i >* dB — ■ 


linrnPouTdvnrfirif ^^ pnoprRTi - Es ' 


If - total 


1 TTE W6t:i SITTIiaTS- ABE-roR-SCR^ROP^C* I of 
REAL fiAS properties 


s ; 

>»i7oisi; 


gamma 


•cpdoo 

■VvpTy^to?” 

»AO l l :7<=(*'l 
.AA^bT-OM 

■ VJ ' iTrffVoN ’ 

• P 7 ? 3 t * d '9 


Al 7 R 6 « I » 0 M 
Al 9 n 35 * 6 M . 

• 19B|?rO'l 

1 ‘OM* 


_.|2039«0t 
*f 2l3«t*or 
. » 22 Ab*ni 
• l?TlArOJ 

•IZiTAtdl 
•I 237J+01 
?12lS7ior 


• ‘lll098*pM 

■^‘ I'iAdStoV 

.3>22fiACA 
• * 31 , P f’f fcA ■■ 

•PTSaT-CM 
■“ia4M5?+0M" 
•20S1 |#0A_ 
'■'i 1*175409 


.18000*0*1 

"mnn'*o*r 

*36000*03 


*S703 M»00 «I7A| 0-0S 

• 60100*00 • I 925 B - 0 S 


•900DO*02 
■;'«i5noD*02' 
.18001) *02 
’.60000*01" 


A«Ol97*no 

'’ 259727 * 00 " 

•58936*00 

■V5876»*0JJ 


• I |70?-OS 
“••|0S6q-05- 

.92|*l2-a6 

• 76136-06* 


•17302*05 
"»^I552*05"" 
.tdft05*05 
T»0®31*0S— 
•♦I01«1*05 
• 10327*05 - 
•10313*05 
'.01326*01 
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T^ble 3-1.1 (Continued) 


... J. SJPrRSQNtC -FLOW AlflAUVSIS^OSlMs; the !.OC'eft^EO-HUNtSV^CL£ HtTLTJPLiC s COHPUTER PROORjitt 

" “'-''a^s-pA'RYrftr ■'■ — — - 

; . -. „. . . c <»it H»« :: J_ .■ ^ 

Shuttle se» motor iinztLE . ' ; ’! 

^ . • X REAt SA‘i FROPEfil l ES " "T ^ 

.. _ h-total ■ ■: ■■ ■ ■■■" 


PISE 2 


s 


,^amha 


sHS«.q«» 


"►BaZHIOH 
»09«3Z*o_B_ 
,^iav ji'oB 
.^a-TTitrjs 


• tTBJ 1*0** 

. I9«i l♦0■» 

•Tta j iViii 

. i9»i r*p«» 


»l2yH2»01 

^|33I7*0I 
i»nt" 
• 1 3Ao:»+ol 


•~1 2i6V4.5V 
,B.371S4.03 
■.AtViz+OJ" 
.SAOI*'»03 


»360d0t01 


>Se7AQ-»00 <695A0->U<> 


_.3«,goo*oo 

.laocptcti"' 

.3Annn-rfii 


•SRZTTfdC 
:sfln35*0‘0,* 
• S7207i>.00 


•H2702-0A 
'•3631 1-C6 
•235B0-Ca 


,-^72B3-»0A 
Ti STS-ST^ST- 
. .7S3S'i*0M 
'•T7T37*3H 
,» 79« S7*0H 


.dn!i'Jo . 

A 1 f ^69>0H 

^ aS f 6 tnS- 

• S'?9h J 

• 7 1 * *r 

> VT S.2 ♦P ^ 

• ' 9 ? I & 3 > 0 ‘l 

• 3 * t'll. 


♦ ?99Vst09 

^ I 

^ ??n2i +dH_ 
. t 9i*l bV0H 
j9ai>> + 0^^ 

7!9M! jios 
» \ 9-i t»o*i 
*19^1 > 6*0*1 

► i9ni 

‘Vi9ni t 

r! 9#^ u 

7i99ii^oi-* 

► I 9 n M ^09 


• 1 ^ 7s At ml 
• » i^antoT 

* r 2 ?flAi 6 r 

_• t ?3*j7+ni 

i I 

>}2372»t3I 

• I2«5b*ai 

JP^I 2990*n I 

• t306b*ru 

J?j 

■ 

* t.3*599*ni 


H-T 0T*L 

•e V2S«0fi 


heal GaS PHOPEItT 


^ 3a! 97 *09^ 

• 31 9 I 1 + 0*4 

»2n0 1 .-> + 09^ 

• 7**^ J7*0*r 
*2r,*\7 *]*0*\ 

. M«72+09 

^li2333 + b^ 

• 0i 55*1 *0 3 

• /[MyTtni” 
*'iA SO /+01 
lES 


+B0000*n2 

• «4S25h-»02 

_•! 6noo*02 

•oGroa*oi‘ 

• 9o^an*ni 

‘%2nnfftj + 0l“ 

• fiDtJob^OO 
•2AA67^00 
« lofloo^no 

'•ftoobo-nr 

J. I6f)00-Dl 

• noniju-»n2' 

• I A0G0*r»2 


•&n737+00 
.53093+00 
^5f?l90 + C0 
•S9755+ho 

• Aa 02 *J +00 

^•597 I 9 + 00‘ 

»5B992+0o 

.5ft79?+00 
““•5 AT I B + Od“ 

• 5A320-^00 

I’^oa" 


• ! 725 A-D 5 

_.1H24»7-05 
.12959-05^ 
•11729-05 
"'^10*^9 J -Ob' 

• 92 375-0^ 

•&9760-0& 
“•'60999-06 ■ 
•93CH9-06 
3 A *1 ^ 3 " 0 6“ 
•23&B6-06 


• tSa:iH «05 
"TT'S^ITOO? 

. i 1313*05 
%tC72A + D5 

• 1 033^ + 05 

• J G 3 ^ 2^{35 
“i’373i5!»DT 

•3723S+09 

‘•6«4603^09 

»79616*0** 

. 77934+0*4 

• 7*49 1 •♦OH 


i 

~t5© 


.*•4769.03 


" GamiIA 


•00330 

.3 

"^5 3^37+04 

• 6?562*.0H 
c 6 9 J j5+0 4 
_. 7 :^7 73+04 

Tb^»'T9 6 4 04 

• ^573ii+c4 

'a 7**4 7+04' 
»q^»9S3+04^ 
. Vl^57 + b‘4^ 

^ 4i I) 7 + nM 


’21+04 

*23+04 
^4+0^ 
U7 + D4 
y i I +04 
Ut +0 4 
» I I +0 4^ 
•1 I +0 4^' 
n I 

II i ►OH 
n J - n»i 


• 1 I'’l 9 + 0 i 
^l2C3?+n^ 

'• l2^ni'^Qi 
jjJ 2277 + t}l_ 
• t7^30*ni 

• t 2364+ni 

• 1 237ft + nt 

• ! 279 Mni_ 
’• i2pan+o'i 

• 1 3C04*ni 

• ! 3269 + 0 i 

. I 1 1 * 9 » •”. j 


• 5'r5af+04' 
_.47359+04 

• 3>342 + 04' 
^^4669+04 

.3fl450 + 04^ 
*26690+04 

• 22^87 +04”" 
_• I7727«0q 

• i 5 P 3 S+n 4 ” 

• I 3^*27 + 04 
^•920846.01 

#*?7«73 + n'» 


•!0*4S^04 

'“r 3 ^Tdod+ 03 '' 

• 19000^03 

T 9 bobo*n 2 “ 

.450no+02 

• I ftC 00 ^fV 2 ^ 
•60000+01 

'•3ACOd*or 

•lapoo+tu 

•360n0^00 

• I qnn*r+nn 


•56677+00 

“759339+00" 

.6CI45+D0 

• 6 d 279 + 0 GT 

•60017+00 


• I7326-DS 
VtSl66-05 

• 13793-05 
~12^0i-O5- 

•11302-05 


•59495+00 
•59551+00 
•59562+00 
%5936n+00 
• 5971 7*0(1 


•02327-06 
•75144-06' 
*65929-06 
•47011-06 
• 400 J 1-06 


"rrrrrs^DS- 

•i2372*95 
• MT33*CS 
•1«729*C5 
“713499+05 
•I0370^05 
'7nj3r9+or" 
.90064+04 
'•S06*<8+i?4 
•eS47B*04 
•80459+04 
•74660+04 


- W- 

s§ 
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Table 3-11 (Continued) 


S UPEI^SOWIC fLQft AWALTSIS UStNc Th E LOCKHgCO^HtJWTSVtLtC MUlTJPlC SHOCK COHPUTCR PROGstH 

^ GAs-pTRiTTcup^Ftb^ Solution- — — -- — — • - 

_ CASE HOp 1 


Shuttle stp hotor unzjxt 
H-TOTJlt 


“peal gas properties 


..S390- #0«1 


*p>?cnc 

• 3?«26+t!4 

l9 + q4_ 

^^72\2*bH 

• 690hS*0^ 

<nr.*>92^n9 

• 8?8*49^CM” 

• 9^02S4^nH 
•97IH8+09 


^70t**n^Dq 

•70U06*OH 

• 19A7«^H. 
_« |9Aiq^nH 
« i qn J 
• !9?l l+OH 
^1 9Pl l+nq 
.19*1 1 I 
~;i9A! l*OH 
^9Pi !+0*i_ 
■ | 9#»n *09 
.19‘^M*»09 


*nse7*oi 
"TTHY^^oT 
_• iroiq+ni 

• f7?os*or 

• 173o3*oi^ 

. 123S7*ni 

• l737R + nt 
» t2>a6*oi 

• i2A7fttn^ 
♦l29V9^bl 

• !326A*0!_ 

• l3S60^flJ 


H>T0T» L 

•.2|87?+‘Gri 


REAL GAS PkOTE 


.99909409 

#95737 *09“ 
-^piqs^oq 

".397A2409' 

_ #3o*»*i^oq 

’%2A»l5540q 

#?2'^30*n‘* 

* l7i^H404 

• 15^93409 
if3ft2l 409 

#97762 + 03 

#7fi0S9403“ 

•S1B75403 

RTrEs 


•P0C0O4D2 

#16000402 

%fli30no+or 
#90000401 
■V2nnno40i" 
•flO00Q4O0 
“i^2^66740a 
• 1 6000*00 
%poooo-ni “ 
• ifrnno-ni 
“inoo^o-nr* 
• 16.000-02 


♦ Hft3e9#*00* \179**0^0b\ 


•55086400 

%589 10+O(r‘ 
•S9e2^400 
“.599 *i 0403 ■ 
.59379400 
■*57bq?iUa ■ 
•59602400 . 
.59619*00 
• 59q*<0400 
% 5929 1400“ 
•58770400 


#15170*05 

#13820-05 

#12552*05 

“11355*05 

#99120*06 

“Ttf2766-=tJ5- 

•75563-06 

•66313-06 

•97393-06 

”*q02?q-C6 

•26575-06 


-.91765403 


• 5891 *0*1 


•cnoeo 

_^3M0S64fiH • 

_#6372|+o4 

.* 7 n 69 3^09 
>7f?p9#09 
#R7l574t^9 
_.ft7" 1 h#C9 
•09920409 

• 9f 

• 97f»72 + f;t| 

'-ncvuo ‘ 

• 337U040q 

•5n?A0404 

• 632^3^n<t 


• I996540M 

#!9P924Qtf 

• r9P3b40T 

^!9R|640H_ 

#19812404 

•19PI?409 

• 198 I f 4<T*T 
•J9P I I 4C9 
T198( |404 
•19P1 |409 

"7r¥Pn#0Tr 

#l98M*f^9 

• 1901 1 4C9 

%~2n2'*1>C9^" 

•?00?640q^ 

• rvOHO+Ol 
. J 9830409 


• I 1 856401 
#1 1^73*0^ 
#12169401 
#l7ZS34ni 

• 173ii^#pP 

• J :?35540I 
- i!?3'7a#r 1 

• 1776C4DI_ 

”^12650401 

^1 297M401 

• i37H«;irr* 

• 1 33*174^1 

• 135h^ 5T" 
#n52.34bT“ 

#11637401 

• I 1957 401 

• 17199401 


•53183*04 

#0fl6974Qq 
#9087540 4' 
•36079409 
31720400' 
#778 I 9*0*1 
T^T^ij^ipr 
#lfl?|7*Ci9 
"* U557409 ^ 

• ml 6t 4pq 
V9ft65r403' 

• p*i 3a?*n3 


“iS0*^D;)439'^ 
#971 Ol4f)H 
• 9i>6 10409 * 
#36169*09 


• 10I6640H *55602400 * •17769-05 •12938*05. 

• 3’600u 403 ^58723*00“' rr5Aoq-o5“ ^ Il37l*05 

_»|PC00*n3_ .59908400 •IHZiq-OS #10552*05 

#90000^82 . 6Q269 +00 T| 2896*05 ’ ■“'•1056^405* 

• 95 000 *112 .60123400 •11667-05 #10903405 

#bv53?#UIJ • I o 1 A*J— #"103 1 8*0S"' 

•60000401 #59771400 .85239-06 #91695409 

• 36000401 ■ *59875400 i7793B-06 •59388*09 

•18000401 ".59925*00 •68999-06 •86991*09 

”06000*00 F59B27*nO #99 1 22-06^^ # 809 1 7*09- 

_^a00D400 •59719*00 #9lR96-C6 .79098*09 

”36UU0-1M“ F5V299‘*00'" #277 8 8*^8— — t7 5755 *09- 

“i 80000402 i'979B2400”“ #1«225*05 •2t639*0S 

.95709402 #98755400 •17393-05 #10058405 

16000*02 V5328 9 40P i 1 5529 *05' — . 130«6*05 

#80000401 .57163400 .19238*05 •1)537405 


fWKasa 
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Table 3-11 (Continued) 

SUPEffSOHtC FLq» Aw**-Tsfs uSl'Ns the LOCitHEED-HUMTSViLLE HOLT IpLt SHOCK CORpOTER RRoGRiH 


S'-»rr Shuttle sep motor hoz2«.c 


h-total 


ca*?e no, 1 


REAL .^AS PROPER fits 




.7fi?57»0«» 

• 7r«87+0«» 
«*»!/* 1 0 * 0 ** 
•B7227*0H 
.npZ55*0‘l_ 
*71 AC5tn<*“ 

■ 9«^AAQ*0** 
.7aV39*07 
.791 33 ♦ 0*1 


h-tota l 

•, !?A17#bT 

— T~ " 

.CCOQO 


«628gl»«0it 


.Ofjddc 

_..3«S37*0‘t 
.55730*07 
»ApR3S*Q7 
♦7|7o7*OH 
.7 75? t ♦m « 

• 03575*07 
,B9057* 07 
•7Ttii*07 

»93795.f)»t 

.776|A*o<| 

.7 n7|fl*o*t 

.tot ts.iis 

.33550*07 
.553 75 *07 
.*7232*07 
.73705*07 i 
_..77l77*07_v 
ini252*07 
•7n« 12*09 

* 7 . 3775*07 


• 1 7 5 it 

• 17PI 

»!9B I 
_j t 751 
.t7nt 
»t9ftt 

• t9Pl 

,i9Pl 


0*07 
3*07 
1 *0 7 
1*07 
1*07 
1*07 

1*67 

1*07 

!_*07 

■real 


G AMHA 

.12271*01 
• !2J72*DI 

*l2377*ni 

^12759*01 

, I2fl9 9*ni_ 

»i296B*pj 

*13270*01 

*13393*01 

• 1.3591*01 

‘ gas' PROPER' 


•3l72e*07 

• 2807 1*07 
j23536*07_ 

•IBAHO* 0 *r 

_*lA7n6*0^ 

• 17272*07 
»775v7*03 
.»J177*03 
^59715*03 
lES 


.70000*01 

TTBtJoSrw 

_.B0OOO*0O 
.2AA87*00~ 
_♦ 16000*00 
’’.ooocio-oi'' 
• I 6000*01 
»BOOno*02 
.*16000*02 


» 59757*00 *1295^05' 


•57558*00 

.'57ft20*00‘ 

.5:793^*00* 

'■;6979'V*00- 

.57715*00 ., 

.59720*00 


•10257-05 
“• B5829*04' 
« 78508*05 
"i 690 25*06“ 
•77550-06 


•’fo«tG*OS 
y f tl 757 *05 " 
..* i0327'*’05 
805*07 
•89571*07 
■i86628*07 ' 
•81 012*07 


•28081-06 •75812*07 


•20017*07 

•1 7725*07 

”• i'7P7o*07 
•17820*07 
•17813*0" 

• 19 ni2*'..7 

• I 781 i *07 
_^17«1 1*07 

.I9nit*07~ 

• 1791 I *0 7 
•17911*07 

1991 1*07 
,lVnit*07~ 

•70375*07 
.70157*07 
,19727*07 
•19753 *07 

• 19929*07 
_^t7ni9*a7_ 

•f78ii*d7 

• 1?ni7.*07 

• 19.812*0*1 


• 1 fZ^n'^aT 

»t 17| 1*01 

iH 2? *0 1 
*12227*01 

■ 7 X 2797*01 

. 12377*01 

“•l2376*or 

• 12231*0^ 

’‘•12819*01 

•12997*01 

• 1-3220*01 

• 1 3325*01 
■7 135 27*0 r 

■"ii i770*0F 

« I l56o*nl 

* 1 1 B 6 J *01 

I20flo*ni 
* 1 2232*6i 
•12322*01 
7 1 2373*01 ~ 
• 1 2729*01 
*17811*01 


» 59 »6 6* (T‘r *T80ffO 

>5o26l*09 *10187 


*72^B3*07 

•377B3*09 

• 3 7''97*oT' 

_*?8954*o9 

•?93o7*ntr 

*193|9*07_ 

*17290*07 

» 19807*07 

.10132*07 

»B5'<0t *03 

♦Sa6|7;03" 

'■7i5T79676T' 

.7b339*0*^ 

• .7 I •^77*07“ 
.37551t07 
.3327 5*0»|“ 
^•29275*09 
•29567*07' 
•19535*07 

• I 7'i«ff73T' 


•36000* 
• 1 BPOO* 
•70000* 
•75000* 
"TiBOOO* 
•60000* 
"•’36000* 
•taono* 
•i6ooo* 
• 16000* 
'736000* 


•80000*02" 
*75836*02 
• I 6000*02" 
• 80000*01 
80000*0 r 
• 20000*01 
'•8CD00*00" 
•26667*00 


■+ 0 *r iS3090*00 irl^376-0S' 

♦07 •57593*00 *18188-05 

♦Oj ;S;797'2*otr~~ST6D30-05' 
♦03 *59535*00 *17627-05 


*60196*00 

’"*'59707*00' 

_^ 60000 *ob 

•60158*00" 

•6o276*00 

•60163*00 
•59865*00 ‘ 

■V7'6687*0bT' 
•777 37*00 
■*5l537*fl(iP 
.55559*00 
*;Sfl776*00'' 
.59886*00 
•597n0*Op ' 
•60056*00 


•1 2030-05 
~i 1051 3-05' 
•88132-06 
“•80732-06" 
•71009-06 
‘T5TZ3Z ^06 - 
•73803-06 
“♦29237-06 

■; 1 8776-05" 


-*1577S*05-: 
•137 15*05 
"•11671*05 
•1I008*05 
"rrow«r3>o5- 
• i07HH*0S, 
■710327*05 ’ 
•92728*07 
■69013.7*07 
*87 172*07 
■7«r37t*cr' 
•79777*07 
■•7603>*07 

■*23857*05' 


. 17673-OS *20071*05 


*17673-05 
’•13362-05 
*12122-05 
*10600-05“ 
*8 8965-06 


•12023*05 
'• I 1 038*05 
•;l0565*a5 
■*10339*05 
«(92636*07 
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Table 3-11 (Continued) 


SUPe*IS 11 NIC flow analysis using Ttie lOCKHCEOTHOMtSVILLe multiple SHOeit COKPUTEB PROGHliM 

fiTS^PTRTTCCe-FCSSnS'ODITl o»r" — — — 

^ case nO, I 


SS*aCE shuttle SEP MOTOR MOrTL^ 


SfiS 


H-TOTAL 


,62320 * 3 i)“ 


Qamha 


• Pin 2 ^ 0 '* 
~»P 7 Ha 9*03 
_.PS 10 P* 03 _ 

• tiili 3 fl »65 


. 1 » 012*03 

•I93|2«0H 

• 1*90 12*03 


♦ 12936*01 

• 13«!3*ril 
*133l?*rjl 


• 1h 90|*03 ,M0000>Q1 .60325*00 •TlTIrt^O^ .d?357*0*» 


• I0<59*0'i •I600a*‘3r 

•66991*03 •30900-02 


Vi' 3527 *oy . 57365*03 ?t 6000-03 


•60275*00 

"•60006*00’ 


•55317-06 

-*29629-06 


•Y 9 SS 7*05 
•761 13*05 


UPPER nou?)i>ARy 

• IO0C.?*O5 X- -.lnO03 + 0H 


■RUN"COTOFr“ iHrftRHAxroN — 


LOWER BoUROaRy 




SPECIE 

I 


Radius 

• I fooo*!* t’ 

« 17590*01 
•ESnOO-ll 
_^ 37000 * 0 l 

• «* 5 :sc!j*nr 

• 6Sf«39*3l 


•mass pE'fSITT emssiVITY ACCM, COEFF. 

• 2S000*o 3 ■ •OO'IOO •'ooooo ~ ■ 

»2590q*Q3 ■00300 »OQnnD 

• 2 so' 30 *o 3 *00000 •noano 

• 25900*03 *00000 •oonoo 

• 25 ftOO*o 3 •oonoo *00900 

ji 2 S 000*03 •ooooo >09000 


the particles Constitute 3*ai percent by weigmt flow of the gas-part |ClE mi XTV itE 

“ thc ind I viOuaiT Percent A 6ES~iRE TTO ;tc — TT o — 7713 — 720 — no 

the particle temperature-fnthalpt Table pill be read ih pith English units 


particle temperature-enthalpy table 


Phase Change oata ••• thclt- •51sbs3*0'i hsol»o-, •35oi07*oa hliquIo* •56S207*cb 

cPnELT. . 4 8510 : r v' cPSolIO- •BI19V*05 


CS 3 csa csD d 3 cs srs 






SS 3 C 3 




LOCKHEED > HUNTSVILLE RESEARCH & ENGINEERING CENTER 




CS CS3 C=3 E=3 CZ3 £S3 C3 ,C3: 


Table 3-11 (Continued) 


. SuncR$ONlC r:-OW ANALYSTS using The L0CKHE£D*^HUNTSVTL|,E mult iple SHOCIC COT<PtfTeiT PROGRA* 

case ri^.' I .■■:.■ -• --■ ■ ’ ' -■■■• 


^•\rz shuttle hotor nozzle 


PARTTCLE dras table 


RE 

Tooooo 

w\ 2 ^in* 0 t 

J^12A00^01 

"•I '2*50 ♦or 
, 15B20*01^ 

« 7 SIS. 1 »QI 

•3t*00^0l 

l*’5DlU0 + 0i 

_. Ajion+oi_ 

•79500*01 

• f c 0 i;n »02 
• ! ZAOO^CZ 

• 15 Q 2 O* 0 Z_ 
. i99sn*02 

_.2St0il*02_ 

•31&00+02 

• 19 *^ 00^^02 
.50105^02 
•Aiinn+oi 

^•79500*02“ 
^10000*03 
“.31 AflO^Oa'^ 

• I pcoo^o^ 

• I 00 in* OH 
. I Q000*G6 


ORAG COEF^^ 

7fooiV0+oi“ 
. Inooo+Di 
■'! . loono^Di 

.lfl 0 | 0 * 0 i 
*lC02C*0| ' 

.1 iHto*or 

•l22Hfl*0l 

*iai«vn*ai 

• 15 I 70*on 
• ! A 250 * 0 l 

•ITHSO^OI 

• 1 079 0 »0| 
,2f^?iO*ai 

•? I r^o*q;[ 

•' 23 im 3 *GT* 

•nponO*oi 

.5^20*01 

• 37S2n*of 
,3a2so+oi 

•ni 55 <i* 0 L 

, 790 o 0*01 
. ,20n*ltJ*C7 
•inG 70+02 
•2oonfl^U4 
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Table 3-11 (Continued) 


I 

to 

-a 

o& 


supersonic rtow AN*!.YS:5 USiKo T 

oe xsckhfcd- 

HURTSVlLLe HULTIPlC SHOCK COHpUTCR PitORR^H 


GAS 

c*se 

-PSRTlCUf TL0« SbCWTTdH^ 
NO, 1 


, PAoe 1* 

shuttle TmEP motor H0Z2LE 






; 



GASEPOF STARTING line info 

/ * ■ . 


. X M 

TWETa 

■S HAC« angle SHOCITTiNCtE" 

H-T0T6L — - * - - 

, » RffOPOfl 

LiL*_2j»«iT^Go «Ml6A«ni 

•noodP 


■•99«o9*02 .00000 

;-.l97t>6»08. 

.Sr30*t-02 

Rt2a4^*0tr 

•95769*00 

•57069*02 

*9>(n9l*62 .00000 

-n9^7n7*08 

«i!AA(>ai 

*izp%^*nn •iHi7P^oi 

.91650*00 

.57170*07 

'.4<lftS.T*02 .oocno 

-.I97O7*0b' 


• «Z3|7*cit ii‘«i99+ai 

.I3779*rt 

•S7?n5*02 

,997B9*02 .OUOUO 

-•l970>Tfr8" " 


• » ? ZT9*» ♦on • I 2 ! T+n 1 

;i092P*ri 

itS737*>>07 

*4 47nfi+02 .noono 

-.19707*08 

• 2sic;7-PI 

• IZT^S^Crt 

.23I2«*r.l 

»S7479*02" 

.995a5*02 .OOCOO 

-; 19707*08 — ■ 


— . IH7P«*0!_ 

.27R9‘»*CI 

•S767P+02 

.9m«( 95*02 .oonno 

1.19708*08 

♦ •tt B t 3-31 

it 1 260*^rTp • 1 

. 32737*01 

.57fl9***02 

,99779*02 .ocono 

~?-''.t97C«*08 


•tZAiT+Cn .!<n7T+pi 

t 

.5BI57*02 

’*4*»nA7^02 .ooonn 

-.19709*08 ' ‘ 

,5;H70-ai 


,9^733*01 

,5n957*02 

;93nA9*02 .oodcio 

“'-•1V70V*Gb ^ 

• SF3!1‘I-CI 

jH*t9H+n j 

•979F0*nl 

.59795*02 

■.93629*07 .OOSnO 

-.19710*08 

.*••1 3,9 -'01 

»t24x*d^0*T •l4«i&7+ni 

.53762*0! 

,59 1 77*02 

.93352*0?.^ .00000 

1971 1*08"' — 


* 2'3’i3*nR 

_.58781*0J 

.59591*02 

l93n53*t»J'» .oopno 

-.19712*08 


• 1279 3+CR . l-*730<'Ot 

»S99ci *CI 

*A00»VZ^02 

19?726*02~| .ODOnO “ 

-.19712*08 

.1. 

# T^2rtH»Cn • 

.70999*0! 

« AOS*i0^O2 

\ mOOQOn 

-.I971H+0B ^ 


• i2in^*0ft *t 

• 7 AAS4 ♦fS 1 

*41 11 Z^02 

.9 1992*02 ;~D06o0 


*9:2flA-fn 

«»2RnO*0<I ,IS07.3*0i 

.93! 95*0! 

.4171 S>02 

.91569*02 .OConO 

-.19716*08 

» 1 r* i *»o '♦^do 


.92B39*ri 

,62659*02 

.90919*02 .OOooO — 

-.19718*08 

,ir*i7S-»03 

»ll7as-»3f> ,)S3^P«0l 

.971 I*S*OI 

.A30«2*02 

*40474^02 .00000 

-.19719*08 

R j ro i ft+OT 

• 1 i7i9*C^ * tS'5M7+of 


,63999*02 : 

•^n3*iA^02 *ocono “ 

19720*08 

.. I!"97»0»l 

*n«i7?*BO «l56S*»*nt 

.11039,^2 

.69991*02 

V397d3*02 .00000 

,-.19722908 ' 


• 1 • * rsBzi^Pi 

VI 1757*02 

• «5I,9»*02 

i39 19.7*02 «UOiioD 

“-JIV729+U8' — 

♦!7737*fln 


_.! 2999*02 

• 6M71*07 

'.39398*02 ..fioaon 

-i.l9727*0« * 

• i23S7*6fi" 

f 1 i t * • 1 63 aO-^O I 


i 67959*02 

.37659*02 .00000 

“s;i 9730*08“ *— 

•I3991*nn 

_ • 1 09«;9+i;in , ( I 

_ji4 943^0Z- 


mXhnHn*nz *00000 

-•19733*08 

I "^•I'STAion 

•io790*on •t6993+Gi 

\iibo'^*oz 


•34nH4^02 .00000 

-.19737*08 


PAR 

!7ICL£ START 

LINE rRoptai 

Its — — — ~ — — — “ 


point 

sprcir u 

V-: ■ , 

thETa 

enthalpy 

OeHSITY 

t. •“ 

I .‘•3B67+09 

fobooo 

•oBdqo 

•50821*08 

• HI 806-031 ^ 

_ . 1 

2 .*11999*09 

•noOoH 

•onnoo 

•5l22B*oa 

• 9H<362-dH 

! • 

3 •39960^04 

•cnodri , 

-.onddo 

•si679*oa 

. 1 i2H4=03 

. . ! 

4 «37f^B4^04 

• R0P0C1 

•onODo 

>52027*08 

•12661-03 

t 

5 *3^109404 

•flnnoo 

uooooo 

.52563*08 

• 15260W03 — 

1 

A *32769*0<t 

.onoco 

VonpoQ, 

■532! 8*08 

‘•9.3S3I-0H 

2 

1 .*13073*09 

•77319*02 

• 3&4704dd « •^OBiSVOd 

.51787*05' — 

* 

2 .92000*09 

.72707*02 

•302tia*oo : ' •si229*na 

•95817-05 

2 

3 *3 996*1 *09 

• f 6090*02 

.23287^00 •S|G77*08 

JIT 238*03 

/ Z 

9 .37999*09 

•12562*02 

•19995*00 *52033*08 

•12653-03 

*2 

~ ^ .3^393*09 

.7 4*>H4t0l ■ 

^ •l?O604Oir / ^ 

■ 215258-03 — 

2 . 

6* .32773*09 

• 7547f)»0: 

• «f952e-Ol .53233*08 

•93930-05 


ca ra cn gd - cm ^'gz 3 cnG" cgd .c=d. e=j geg; c=: 


CX3. CG3 '^',C3 


1 


Table 3-11 (Continued) 

SilPE^SOHlC FLOW AMAl,YSjS^US!«e THE LOCKllFEn-;^UNT«!yttLE WOlTIPlC SHOCK COMPUTER 
* ■' fii(S-PARTtfLC FLOfl'SoLUTIoM ■ -* 

— — - C*SE « 0 ,. ■ ■ J 


p'roorAn 


’iCE Shuttle sfp witos nozjle 
PtllMT”SPEcrE ' 

3 ; 

3 2 

1 3 3 


e 3 9*1 Ht ♦0*1 
.379ds*b«| 

• J 770 &^OH 
* 37 »>n 9 ^n 4 _ 

'* 37 ^ 3 n^n»i 
0 3 ^** 37 -»n 4 

^%« 2 nri 9*04 ’ 

_* 39 * 5 *<n +04 ^ 

• 3 ^*iSp *04 

. 32 '' 1 ^’+ 0 H 
_#<l 40 | 9 ^n 9 ^ 

• 3 P 59 A *^09 
“* 3 ani i^ 04 “ 

e 32^7 7 Trr'r“ 
e 94 f 1 ft P 

•396An*04 

“TisnA? *-"4 " 

• 3 r%*t*iet + 04 
"TTP' 24 '^A 4 

• 't 4!7 I ♦Oh 

^•‘ 3 aT 37 *OH 

• 35 -‘'*nP ►n<i 

• 3 2 ^nV{i 4 
» 947 A 9 + nH^ 
i 923 «ln*nH 
• 39 n 77^04 

‘ * 3 a 7 (j 7 ^n 4 

• 3 sAPr)*n 9 
. 3 3 n 9 ^+TfT 4 

0 't J 4 Ti /, ™ 

. 39 ' 72 ’; + P 4 

• 3 "j/ 9 ) ♦Oh 
« ^is 7 A y ♦Pm 

TSiTT 7 ’tGq 


^5*f72i;H.02 

.a4'*B9 + a2^ 

.32IHA + CJ2 

*?ST79*t*2" 

*51 ***1*^1 
tft2 33 2-»>r/2 

• A 6 ^'t 7^02 “ 
eaB3B7*C2_ 
e37flVrj*C2 

• ? 2 fVl •'C 2 
.77^09*01 " 
>Hn2H»03_ 
•P9A60*C2 

’ t5a758*C2^' 
>30 ! 3ft»r2 

• loVt!A*02 
» ! 3 PSa »33 

• 1 I 272^03 

•A3A27*n2T" 

•377tA*Q2 

^T1 27 i^'i "■ 
e I 67Hl|^n.: 

I 3A27<-D3^ 

• 98 *;S 7 *- 0 ^ 
~77l*i7»C2'‘’^ 

• 95 '^A 2 *C 2 

*i\i 

« 1 9A&9 ^ 

"Tl 602 'i ►03^ 

_>I 

*90’6S^02 

• 540 Pi *02 
*|H«V^rV 62 
> 777 |k 4 + 0 ^ 
^IU*fV0*03 
>13397 *-03 

^ If»97iv03 
•624tn*C2 

« *^0 3 

"p 7 itU,-»>nj 

• 1 5 *^0 3 

"i 1 ! t-Oi "" 

• 7 i t n n Hi i 

V^C ! i 9 


Theta 

_.7|935^00_ 

>A6B64>dh 

• 96 * 49*^00 
^i30053^nrr 
e24 t 79*P n 

• 893 7 i -(TP 
_rln739*0t 

i9|'2|7*D0 
_»7nl 59*0'' 

• 57233^00 ^ 
• 3 a 37 H*DO 

• I 3*<*iH*an“ 
_*M36‘4+0! 

• t22OH#0t " 
_e93fi95^no 

• 76596 H. 0 n" 
>48^99*00 

• IRI22^0ff" 

• I 8 D 29 ^ 0 I 
“15321 ♦01’" 
_«n793*CH 

• 967 oa‘>OD 

• 6 t T 9 Q^ 0 n 

• 2 7 ^ /"Airin' 
• 2 i 744 + 0 I 

"'•I39B4+01^ 

• I 4235 * 0 t 
” I lAlO+Ol”’ 

•71^17*00 
”72777*1*7^ 
^2S523*-0I 
•21 7oi ♦D| 

• I ^724 + 01 
“• i 3 A 35 V 0 I 

eB6906H-0n 

* •'32AY4^r3ri 
_*29376^01 
”iZ49fl2iOr^ 
e ! 9769*01 
\ 157 o 2 * 0 |~ 
• ln 022 *ni 
"TliO^ETi OO" - 

• i 332 fj^ 0 | 
“.ZaISThOI — 

•2!873*ni 

• l7Pl9+ni — 
•1 l370*ni 

~n*»S9Vcfrj — 


•S0^1S«08 

~ 5 i 229 ^na" 

•5|6es>Q0 

~ 52 Q* 10 iOft’ 

• S 26 Q 1 H.QB 

• b 3 ^ 77 >( 3 ’ll“ 
^r&O^'Ue^Ofl 

.5l22ft*0fl" 

_eSl69fl-*08 

;52n7t408 

• 526944^08 

“TFrmrmr' 

• 5Q797^tl8 
*5I227*08 

' •5|712«QB 
|52O90*nB" 
. •^2696>0H 

•50782408 
~S I 223408^ 
•51726408 
“V5212640P-* 
♦52748408 
"^5i49T»Tnr- 
•50763408 
”iS|2l4^08— 
♦51736408 
^52199408- 
•52791408 
~;T35S V4 0 8 ■ 
♦50738408 
”i5l70040a— 
♦51738408 
"V52I6040B — 
♦52B15408 
"T53^8Tvn7J — 
•50708408 
"•51179408 ■” 
♦51727408 
“.52155408“ 
♦52810408 
■■; 53574 4178 — 

• 5 fi 6704 il 8 
■'.51 1 43 * 08 — 

*5| 7Cl *03 

• 521 28408 
.52768408 

02^08 


• 4 1730-^04 
“•94&B3-04 

• >^ 220703 ^^ 

“ l 2 A 3 d- 0 j; 

.15214-03 

• V 3 i 3 /~XJ 4 
♦41637-04 

■'^•94«i65-04 
.11192^03 
“ 12575-03 ' 
•15161-03 
♦ 926 B 2-04 
•41510-04 
’•94173-04 - 
•11154-03 
~ 12548-03 " 
•15092-03 
■^•9?lT3^^“0*T-“ 
•41354-04 
“93019-04-^ 
.11109-03 
““♦12495-03— 
•15015-03 
"" ♦ 9 T 4 ^«in — 
♦41171-04 
“"•934 18-04“ 
•11060-03 
““♦12433-01“- 

• 14937-03 

•40968-04 
“'i 92984-04 “ 
•11009-03 
“12^B2-03~ 
♦14863-03 

""•'V 039 TI. O 4 — 

. 437 * 13-04 
“i92533-C4 — 
•10960^03 
’i; 12332-03 — 
• ! 48 q 7-03 

•4n5l5-04 
“'• 92 nrA-d 4 “ 
. so’ I 5-03- 
*•12292-03- 
•14771-03 
“•899VT-5<» 
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Table 3-11 (Continued) 


J- ANA LY StS UStNg T Hg J-OCKHfEO*HUfc|TSV ttLC WLTfPLt 

^A5-PA*iTTcrc’'P^Coir^6C^TTo^ 

: Case wo, I . 


SHOCK COftpUTER fROGRAl 


shuttle s\:p hotor wo^zle 


POI«T 

n_ 

n 

1 r 

I * 

n 

n 

12 

1 7 

I 2 

t? 

12 

!3_ 

U 

13_ 

13 

^| 3 _. 

13 

1 *^ 

iH 

|H _ 

II 

|1 

jS 

\< 

|5 

is 

|S 

|5 

I A 

lA 



i ^ 

i* 

\7 

|T 

IT 

I7 

il 

• * 

II: • 

tH 

IR 

— 

tB 


SPECTE 

1 

2 

3 

5 

6 

1 
z 

1 

5 

6 

i 

2 
3 

S 

h 

1 

2 


• IIS 1 1 *0 

• 12^05^0*} 
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•33S0M+04 
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..}f7p'>*flH 
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•394BA+04 
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•Th ?0 * ♦C 4 


+ 79 07ti*D3^ 

• 23A5!V-03 
^J»7S*03 

• I 33V 1 - 03 “ 
•RQ 14 3-0? 

• 7842A* 02 
/ *3 ?l3H-n3_ 

. 76377^03 

• !9l77-*rja_ 

+ il72S'^63 
+fl9R77*02 
•31P69+02 
+^3&9Hh*03 

• 2971 1*^03 
l2l27p+03_ 

•|6RIP*03 
•99453^02 
•3&4SA' 0? 

^9A23’^03_ 

.3?17|^6i 

*234oR-;r03_ 

• iaier-^03 

,1Q9H S *03 

.39193^02 

»93494*03_ 

•3577^*03 

•757BA-03 

.19925-03 

• I 2CB?'*03 
.9309l^02 
•4 7S8t> 03 
-3flSH7+d3 
•7 «?H0*03 

• 7T7An-(33 

•13744+& 3 

•47167-02 

1+03 

_OOBS?-*03 

"•73737*03 

,44*479*03 

f E I M ^ *“ 

» • ^ M * M 4 
t 4 / < « f tt 4 
_• 4 t 03 

• 2676%+03 
_• 1 6'»I.7 *C3 
•57’IM*n2 


thETa 

• 3736 e«OI 

• 3 l'^ 7 B*or 
__.|‘t 5 * 3 +qi_ 

»l2!"03*Ct 
*‘«<}Oaa«on 
_**»TS37*0I 
> 3 S 3 i 6 «ni 
■2733H*01_ 
»272B5*CI 
» I «t26S»m 

.3896‘*idt 

« 36 ? 0 H» 0 I_ 

.’ 2 '»*» 97 io> 

• 6 nR 36 >pO 

»5tl3s7*01 

•92736*6| 

«3 3lS7* 01 

•2AP73401 

•I 73 A 74 R 1 

•t7020*0n 

_»5*t9«l6*0t 

.‘ItiHnidl 
_.36?9fl+0t_ 
.7<J3*»C*01 
• r9r22+oi 
.r 3 '*'c 7 *on 
_»597fl2*(?t_ 
•50? I e*6T 
• 395 SA 401 
•3t92|idi 

• 7n7S9.ini 

•BnO! I ♦oo 

_*A9fi35*0l 

• 58960+01 

• 82982*01 

*38680*01 

_* 7 ? 507 *flt^ 

• 9,».8R9»ri»r~ 

• /,»♦< < « II I 

• il <l(t. Id I 

•88136*01 

^' 38778^01 

^25337*01 

•97013*00 


•50828*08 

• 5 tto£*de' 

^51656*09 

• 5'2073*08“ 
•52681*08 

— rsxreTTcnsr 

•50569*00 

.S105|*0B“ 

>51588*08 

.51980+08“ 

.52589*08 

•53i69*Ca 

.50505*00 

^ ^50903*06 ' 
_^.S1898*0B 
•%1 P73*06 ' 
- .i2373*0« 
»52928*0e 
.5r:‘‘3o*c« 

• Si--'^ j|£oa‘“ 

.51:^85*08 

.'si 731 *00— 
•52166*08 
“52££r*ffJT" 

.50385*08 

.50808*08“" 
.51253*08 
.5i568*0fl~ 
.51950*08 
■ .52831*08 ■ 

.50250*08 

•5d£9S*06 
.51 109*08 
~T6l80l*06““ 
.51 76g*08 
.52310*08 
.50188*08 
• •S0S77*0B 
•50963*08 
*5|2H9*D8 — 
.51851*08 
■“.■?78lfi»rwi — 

• 87*/ /Viliii 

• t.|p 4|» I 8 If ft 
^^&t>7bfj + fnj 

• bit 26 + Q8 

• bl762+.nff 
"7y3230*flfl — 


•80225-08 
~T»i 687-08 
• tO»7«-03 
.12266-03 

• 18763-03 
~~V9Ti707 - t: 8 - 

.80030-08 
~.9 1235-08 ■ 
. 10888-03 
' ”12253-53 

• 1 8787— G3 

*90781-5*“ 

.397E0-08 

■ ;90887-08" 
.10821-03 
.12262-03” 
.18382-03 

__.3952S-08 

• 90888-08"' 
•10806-03 
•12288-03— 
♦18925-03 

■ .92667=179— 
•39263-08 

~90l 33-08” 
•10796-03 
.12319-03 - 
•15023-03 
“<113861-08 
•38987-08 
“89772-08”" 
.10786-03 
T125S9*D3~ 
•15136-03 
■7V89HJ-0H 

• 3.8687-08 
■789362-08“ 

*10270-03 
■*12398-03 — 
•15225-03 
“9«;788-ri8 — 

• In 1 V / 

•10716-03- 
".12805-03 ~ 
•15259-03 
TVl>8 8a-C8 — 
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Table 3-11 (Continued) 


SIjPeRSOhIC flow AMALySJS using The LOCKHrCS-HUNTSVlLLE MUlTIPlF shock COHpUTER 

GAS-pARTlfLE .'£,3i» SnlKTIoN 

Case no, i 


PROGRjtH 


Shuttle sep hotoi? 

f> fl T ? ‘ T C D r #- t #• ' 


POl ?-‘7 



1** 

19 

2G 

_?,D 

2Q 

_20 

70 

7 1 

21 

”2l~ 

22 

22 

22 

23 

23 


SPECIE 
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2 

3 

H 

5 
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2 

3 

H 

&“ 

! 

2 

3 


•~3 9A2pV0s~ 

•37073+OH 

_*94760^0'l 

•397S3*n^ 
.371 7t;*Sq"' 

• A733 ♦C'^ 

. H iFTi7 Jf” 

•S I 

"’•^n070*D<J ~ 
^47r09*^0H 

• ^ <1 fl 4 ! ♦ D 

• MS73'i*n‘!^ 
.97773*04 


.6t*«G^*02 

• 99*^6fl*03'^ 

• 3**97*03 

« 28153*(?X 

• J7I99+03 
•6973ft*03 
.51^^39403 

• 38393*03’" 
79'57S*03 

• 1 ROl 3*03' 
.7n=^^<;♦C3 

"TX*76^^rT“ 

.92377*03 

^r32720*r3' 

.75*3l*C3 

'761097*03"' 

•9S *P1»n3 

•fl33V6*rj" 
^A7*0l *03 
.90^69*03^ 


thett: — 

• 7=;6a 1*01 
"*6*1 

_.5 g 937*C1 

.M0^S6+0r 

•7*^61*01 

"7yEA5?*Dr 

• 6 * 802*01 

• «;2*58*0I‘' 

• 97‘’76*0! 

• 27Tq I *c r 

• fl<iR90*0l 

‘T728TJ*Cr 

.57*51*01 
“^9*699*fn - 
.9 I 398*0 1 
7775S9*or 

• 6 I 65S*fl I 


.99906*08 
"%50332*08‘ 
•50739*06 
7T51 132*06” 
>st99a*na‘ 


•50270*06 
“.50716*08 
•51 ldS*OB 
■“.52322*08’ 
.99685*08 
“T5nT£Cr*T78" 
• 5C1769.0B 
•5lSc7*0fl- 
•99579*08 
i5ono*o8" 
.'50938*08 


.89997*01 

‘*10739*02* 


.50120*08 

7^99320*08" 
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■"CONTROl ED By- THE rofCo'^i Nfi-VTnmCPCEs 

LtH" .15Q»00 PL nCLFTE. .100*02 DEG P.M*^ 


•37®57»08 

• lt>fr79-0> 
712385-03 
.15217-03 


^^.7757-09 
^'i06?a-03 " 
*l23**S-03 
-515J35-03 — 

• 370= 

-rsE*?T25^rr« — 

• 10963-33 
“.12171-03 ““ 

.36507-09 

'•Bsl99-e9 

•10272-03 


.82500-09 

739286-09“ 


.600*01 F« 
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Table 3-11 (Continued) 


3t«»>ER5f»NIC FVOW ANALYSIS USfKfi Tup LOCKHpeD»HUHTSVtl.l.E HUlTiPlE SHOCK COMPUTER PRO<5»iM 

P^pTnrrrfTFnTdr^cmoR 

CASE KO, I 


PACE 21 


SPftCE SHUTTLf SFP MOTOR N0Z7uC 


LIME PC:nT ^CRTP - PEC t me 

PAPTICI r IJATA _ _ _ 

SMECTf POIMT" 6E‘5'cBIP'YrO>r 


R X 

^ACH ARcITE “TTfESsURJ 


M 

"SEfiTJril 


ThcTA 


ektropt velocity h-total ITR 

3AS-CONSTi-- trOCAL 'BAMMA SHOCK ' ANCLE " 


JEwstxr' 


j ~ N ittpuT - CekvlN "rrs'JTTTiriS ni r'z**flO ^ — i tsr Yts» o R 

*37ASP«02 •A8S2S>C2 ’.‘•35rR* 0«* •I985I«'0H .l2093-*ai 

P’AHYIClr OATA ~~ ^ ^ ^ 

' ?S tlMlT y^PCAHL lHE . *<0A7‘« 2*t»«l « 1 0739*07 »|3?8 «I* oO »99320*0** •39206-OS 


•3928&*OS 


*^EMP|RaTORE- 


.9B|79*0R 


tWpUT - CntlTIH 

*^*^*'J!*P^ 

PjIhTjrlf OATA 

no '*A«T(fiFS ape PRpSiNT AT TMiS.PnINT 




«3 9 136*0 3 * 6 5735-02 ■9319^*09 .l98Ng*.o«| tl2|0l ♦6* 


I ■ ?*" !NFUT - ^OrillN •! 

^ % 360 99 *02 

PiPTtrlr r.AT'A* “ ' ■ ■ 

MO FflttTjfirP ARE PRFS*--hT at this PQlfT 



»37|52*03 *62992-02 ’*.92831*0*1 


.19895*09 •12|0Y*0I 


CiS >-* 9 S FLOW KaTF 


.fi*‘.7lS*02 particle PAf,S FLOW PATp m 


.37352*01 mixture MASS FLOW RATE M 


•R 5950*02 


RADIUS LOAfllNG 

'VlTooPtni ■;999«*p*ni 

il7000*Or* if 0000*02 ■ ~ 

7750iie*ifiri T2o 000^02 


DEtrxn 


►3377«*C3 


ROTEMTUR-l inrGS AT I 0 'H''REsUETS 

FoRCK* 

►.iRTiaVgs ' .doooo' 7ooolbo i Tli0*i7’9*03 

OFLFTC TQRQTG , PELFXP • OELFYP 


•00000 .00000 .90097*03 .00000 


TOROZP 


NOTES: (1) Typical printout for the startline data surface. 

(2) Some points have been omitted for demonstration purposes. 
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SUPiRSOBlC FLOW analysts 

OSlNg The lOCKKE£D>HUNTSVIlLE multiple shock computer PROGR|(m " 






OAS-PARTrCCE^FLOW SOLUTTOYI ‘ 

case nO, I 
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5HUTTtir 

SEP TOTOR 

NOZAt^. 




■‘1 ■ •:;:[■ - 



LlfiE PO! rir DSC<^IP - 

REC'IHE 

■ R ■ 

X 

. M THETA 

ENTROPT 

‘ VetOClTT 

-.Mi^TOTaL ' 

iTh 

PtRTtr:.r SATA 


Mach an<;le 

pressure 

OCNSJTY tEMPERrrORE 

GaS~CONST. 

LOCAL G4HHA 

: SHCCX 

URE' • 

.*■ 

RPECir PtjIMT OESCRIPttQN 

■ , 2 ’ TT:'- inter C 0 M~IM;^ 

• ... V 

theta 

•12040*00 

DM 

•lASoi +01 .13477*07 

ENTMA,LPY ■ OEMSITT 

•67476*02 •53243*01 

, : ~ •?t EF?SRAT 
; •# i 972a^tt5» 

PaRTICLF OATA 


*373!J^*t3Zi 

tt0Z7*t*03 ^ 







STRCV.HLTNe 

,‘t9J2S3+0‘* 

,RAA77Af-o<t 

•10722*02 

.923RO*0< 

• 12 R 2 D *00 

.20103*00 

•^907O>0» 
• «I979|>o8 

•33499-01 

.?8S3S*Ol ; 

'T-“,11ia5*ci 
■ •1S723*"» ■ 






■ 1 





2 : 2 H l(^TER 

CONIIN 

““TrrnTToa 

.3A5MM*n2 

7Vj>i2+0O' ' ^ 
• 3 aR|fl +33 

• |A79*i*eji 

.41733-02 '.13041*01 

•190*17*01 

— " '•SlUllP'UH 
• I 21 i 0 l* 0 l 

^~V^A|y73trrEf1S^ 


PA»!T 1 CU: fJATA 

srnr.A*^L^ttz 


*.II5T|*o2 

3<|6M*nO 


• 32514-tjl 

• 997dH>CH 





: . . . 


irV^“^-rT ‘ — 













cofn IM 

.1S77?*32 

7M Y23*on 
•36379*03 

• 17 126 -*01 ♦ •16001^07 

♦ ^|fiS5«02 1 '» 26 rO>DH 

• 6a43:7.Q£; 

.19813*01 

' ' ' ';*8l«54*0(|— 
. 12112*01 

■ • 1 ^ # j 

1* 

particlk data 

mo pahtjciER arf present at this point 




— "■ ■V''^ 









* 



i~~~ ?t> »Ai,t - 

'CONI IN _ 

“JITTWriJIi 

■'.3‘|97t+02 

•I iShS+oo 

• S«m9?*ij3 

TT7RT7*nT — _;i / I 1 l +ff7 
• 59177-02 ■''.123?2*0H 

“ •6.9 7 7J+U2 

■ ■ ■" '.S5'S52'*|)1 
• 12120*01 


""" ”9; 


fiC P»HT{Ct<f-5 AFC PgfSENT AT THIS PjatNT 




fntrssVftE" I MTEc»X’.Tn.‘< ResuLTs' ' 

FORrEY ' t0»07 nEI F* 

ios'»s;oT 


Pf>«CEt 

-.rcnaio^' 


• !)0»00 


•00000 


OCLFY 

:ooooo 


ISP 

• 720593 Y 03 '' 


percent CHAOOF T« «ASS» MOMENTUM Ano CNEPGY NUMERICAL INTEGRATION TOR LINE * RELATIVE “TO tAe STrRT tIME 
PERCEKT change TN HAS? FLO'N, GAS'-' WIrAVS-OI PARTICLE - •;3A2S9.01 — MlXTORr-PT •*1SA72-0I 

I'rRCENT cmange |N Mphentumj gAsb ♦7S2tR*om Particle - •ft70a>*oo mixture « ««t2303*oi isp - •*i2irb*oi 

— PERCE»SlT"tHAN6E“|N'EIlCnGrt'~GAS~» — i.727ATr?OE'“’”P'AUTIclT:“-“^”ir9BC37*00 Ml ATORE* -“WAZtOj-OT 


NOTES; (1) Typical printout for a data surface inside the nozzle. 

(2) Some points have been omitted for demonstration purposes. 
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<jyreR*:(JNIC TLO* 'AflALtSlS USiNq The l.OcKHCEf*-HUMTStftLCE MUt,TIPtE SHOCK COMPUTER PROGrAm 

^ "GASiP ART 1 CITETrorTWCUT Ton ' : 

CASE NO, I 


PAGE 00 


CE SHUTTLE SEP MOTOR N 027 LC 


LtNE POIflT OSCRJP - regime 


P*R'|ft r ljr,TA _ _ 

SPECIE PtriNT" OESCRTpTI^?I 


THETA 


entropy 


velocity H-TOTal ITR 


“HTCH~SWGl.Tr ^ReSsHRr" 


>?riSlT?* ■: temperature GAS" const, tOCAfGAMHA^ SMOCK angle 


EMTHATPl 


>EMsmr 


■'•’jTeMPCRATVRE 


AO Ti PHN-Hk - CONtlW .3l*ii7+-10 TT^TFSTfipr TTTSaTTTn 7 «t3RjO* TT7 n ?7r tTi fz 

.l3Sfl2+02 •390|0*0! »I62S3-f33 ‘.17853+0*I .l?81|4-0*l *«I279S-<>01 

»ARTICl.r data” ' ' 

J PA^TIrtFS APE PRCSE’JT AT THIS POINT , * 


60 m PRN-KR - CO'ITIN . 3 1 !»! 7*00 , /A 059 +j)i|( 

.I2‘*35*02 >2lTSP*0l 

’article data 

) PA'JtJE'.CS ARE PRESEN'*' at THIS PolHT’ ' 


• ! 0161-03 


I I5SA5*0S . . 19RI 1*09 


• I,290T*0I 


60 '1'' PRM-HR - COWTTH *3 1 M / *GD 

•Il3on+02 

’AftTlrt r data 

ho PiRrmr? are present at this pottjt 


•>1210*01 


• A 1027 -OS ,l 33 Sl*nS .’iSflll+OS • 13031*01 


^0 ‘I n PRW-HP - CONTIN ^ . J I L I / *Oa. 

^ .1070 ‘*♦02 

PARTICIE PaYa 

NO PAPrlOP? A.RE present at this point 


..S373S*nb .3SRO1-0S .11223*09 .19011*09 .13157*01 


60 >|7 PRN-MR - COMTlH »3l5I 

• .91 130*01 

“PAPTI*‘ir paTA 

NO PAHTlciES ARE PPE‘»E«r AT THIS poINT 




• Z359‘i+nn ‘ •*?20«»2+03 •l9flM+0*l «S32a2>OI 


oP nosS’i’Oi 

pi'MT rrur *r>ATA 

MO ARg pnr^pMT a t this point 


PRN-HR CONST I H _ ^ I ^ » 

"piRTtC-r f>MTA ~ ■- ^ “ 

fjO PARffCirS ARE PRF’>FNT AT THIR PoiNT 


• 92<;fl5-0l 


*P2S66**fl5 


a7276o*n3 .I9ni l+OH «13Hl2^0t 


,3| <l29*ni "'V*iS|^I*n3 ' aJ9Rn*n*i .1352T*0I 


NOTES: (1) Typical printout for a data surface containing a Prandtl -Meyer Expansion, 

(2) Some points have been omitted for demonstration purposes. 
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suPERsoNijc pcbw »»iALYsis usi«G ?Hr LocknitEp-HuvTsvTLLfi MULtTPiLr sKOcit conpUteR pRosr4« 

i" ^ GA'*»P^RT|fLF'Fr,Ov“Snl VTloH' ---t -r- - 


PAQC 169 


SMUTTUE SEP mOTAH »f»Z7LE 


Line OSCRtP - FEfilRC 


H 


• -_2 

Sf'LC ? FptNT descbTptiqn 


HACH ANSLE 


“pIlssmrc 


oTwS'i TT 


theTa 

"TCHPERltbifr 


EWTROPY 

'bAS'CORSTT" 


velocity h-total 

"LOCAL" GAHHa SMOCK *K6LE 


ItR 


THET* 


0 M 


■enThAlPy 


"DENS TTY 


,PA!>TT 


I WAUL - CoNtLH 


cur: OAT ft 


*011000::. 

<lB0S?''*b2 


,i67ftn>of ' 

» » 6060*07 . 


»5C6'n-03 


•UDOOD 

iZS9?0-*0*l 


— 6B t97 * 0 3 - 
iI99l2*a9 


" «»l5ll gT OB - 

•12065*01 


-tebp^butorc-:^ 
»TT9:6i-*i*ir* — 


_i79‘lft7;3*p^ 

,7B9fi:b*99 

.776.t27*o‘« 


'“,76C9'?5+a? 

,727SSi}*oR 

*A7SilS+0*f 


_.0Cf>,0p_ 

'ibcobo 

« tiomb 


•ocooo 

•ocno^ 

rbooOo 


_j«d7S5-b I 
. ib?’5A*nO" 
.15476+00 
. 2 I«7 7 +|jO 
715+00 
,5s444*dG“ 


• 22*112+08 
";230f6*'j9- 

.25*f76+08 
T2B232A0S 
• Ill'll +08 
T3BB*7+08r 


.2:^07 l>oS . 
~1R9 66-05 — 
.417*19-05 
• V99AH « <-o5" - 
.690H5-0S 
•*«iS327-0S “ 


•27626*09 
■•2F«»07*0*1 " 
•1J17S+04 
T 1 97 6 9-+ 0 9 ' 
•41061*04 
-•4 1465*04 ~ 




W. 

N) 

00 


I" 


/7 FREEBO - CONTlM 


•t0l2"*0l 

.6?037*qt 


*vso7'i'*'oo:' 

• 3 1449-0 1 V 


*«3l94"0l 

.41 442-05 


,69064*07 

,55l6l}+03 


i6 977 3 *02 

~t v 8 mr i 4~ 


•10115*05 

T T3 : g2 T -rci '~ 


-.|9737*0S 


»4aTi:ri F OAT* 


trtO PAR^ICCCS ARE PRESENT *T TMT5 PoImT 


ft 4L 6 *;+ .rAHLIME H+S PEEK Inserted ok line: IIT aET^EEK POJIITS :2S aNO 26 

1 19 


t WALL 


- COMTiM 


• OCKO O 

.17836*02 


.•1 6744+01 

• iTO/T+bF 


.326«8.oI 


•4C396-03 


•oonoo 


• 66526*03 ' 

vnm'2*o^ 


.81645*04 

"^T23£7*0r 


-.19653*06 


PA^TlcLr 

VAT A 


■ 





1 

■ .. . 7 


,796789*04 

.790313*04 

. *00000 
.oooOo 

» saTiTi -0 

.tlPZStoO 

-“72329+qB , 
■ .22943+00 

• 20538-05 

• 39363-, OS 

:; .27499+04 

:' ,, .28305*34 ■ ' 


. -1 ■■■:: = 

,777.124*09 

*ogmT3 - ’ 

,16946400 

■ ■ i 25369*04- 

■~”W4ji66-os ; , 

■■'■; 



,‘762..j«9*f14. 

: •oonDo 

* 224*4+00 

.24107+00 

"V.’;-. *44977*05 ■ 


• S 


,#244?1A*09 

.P0f»bo 

~ .ISTSlj+diT^ 

"■“VI 31 94 *05 —— 

: .63T43-0S^" 


• A 

■ r 

,676494*04 

, *anoQo , 

,56598+00 

:•^30764;*‘tI8 

: .44694-05 : 

■ ■ ■ 




rr^ 


*73 EKRESO « CONI 1 N 


;i6TA7+iM 

.69037*01 


’"•".Va6o.4*o0‘^ 

:.3i.6j4?.*o:i:r 


"ITll 194*01 
•4|442-oS 


— a BT ^ T l^pa 
.55160*03 


■■ *6 9 7 7'» 40y 

*19811*04 


■ * 1 0U5 * 0& - 
.13527*01 


—• I 7 7 2r7*Oe— 


PARTIf LF DATA . 

NO PftRr 'ri ES ARE PRESCWT AT: THIS PoMlT 




• pg T H r“ Ngr '‘ >T ‘ gl TLIHE 1 17 H*5 BpeH PELE T EU 


ft *IC4 RTKE*MC!NC'iiAS-^RXE»rTTISE9TinrT1M-i:i»;Er-3TJI^ET*fi:C?r^lNT5^1“Tnin-^ 

• A“rJET STRE«KCTME"Tlft'S*-4EET»“rMSErnTirTJM-LT^HE— TiR-^ET^rEETrTHnMTS — ^53"JniJ) — S9- 


N OTES; (1) Typical printout for a data surface in the exhaust plume. 

(2) Some points have been omitted for demonstration purposes. 
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T^ble 3- U 


INPUT DATA REQUIRED FOR CREATION OF THE THERMODYNAMIC 
GASEOUS PROPER TIES DATA TAPE' 


reactants 



H. iJ*404a4N 

.86106 0 3*40424CL*8&106 

^ '*S375 . 

-60200* S 298.15 

•F 


H 10.3357C 

7*3165 0 .10430 


• 1091 

1200* S 298.15 

■F 


H 11.3J37C 

5*9366 0 1*07940 


*0200 

-650O0* S 298915 

F 


H 8*0975oC 

5,39B3 N #8997 O j 

,8997 

• 0109 

-21000* S 298*15 

:F 


AU3.7064 



•6z::z 

0*0 S 298.15 

'F 


O 1*3787 FE 1*2533 


- 

-12306b* S 298*15 

F 


OMIT 

AL(SI 

alili 

ALCt31S} 

,AUCL3tt^J 



OMIT 

alnCSI 

ALN 

^'Al-aCLO':'-- 

AL202 



OMIT 

-V ccl3 ^ ■ 

:,CCC4 

cii 

CH2 v:-'.; 



OMIT 

CH3 

CH4 

COCL2 

* C2CL2 



omit 

; ..X2H6 VV 'V .... i;. 

C302 




LO 

t 

OMIT 

FEtS) 

FECL) 

FECLZISi 

FECUEIl-J 


OMIT 

H20CSI 

H20ici 

■■ ■ 'ii- , - ' ■■■ 



00 

NAMEUISTS 



•VV - -.r 



o ■ 

SINPTE 







RKT»T * PS I A=T « K AsE * 1 * 1 60iO » * SO • • MOCRP* T • MOCTF*T« PA^J THT* T » 

QUOTP^^aOO* 1 00* 9 t 30 O »NQi I *4 fNOOAtAsT 

SEND' -/f;;:, 

stapgen ’; ■ * .V.':-v^7 

IREAD=1 •10s8tlM-l0 'V'--..:;-' 

SEND 


SEP PROP pc«ieoo 
SRKTINP 

PCp=S* • lO* *20* *40*'*' 
SEND 
STOP 


I* •300* *500* * lOOQ* *5000* • 1 0000* « S0PC^« «NFZ»7 


C-D czi: 


t.PWi ■ > ' ti* 


c:-' ,CD '^ .c-3^ -mn 


' t*T? -'\r^ :'CI3:' '^5 





Example Problem 4 

Example problem 4 is the same as example problem 3 except that the 
start line is input on cards. Table 3-13 presents a flow chart of the input 
data for the specified problem. Note that Card 35 has been replaced by 
Cards 33a and 34a . A listing of the pertinent solution is omitted as it is 
basically the Samo a s for example problem 3. 


3-287 


LOCKHEED -HUNTSVILLE RESEARCH & ENGINEERING CENTER 


Particle Solution Control 
Card 23 


Table 3-13 

REJQUIR ED INPUT FORMAT FOR EXAMPLE PROBLEM 4 


Run Identification Cards 
Cards .1-3 ■ 


Run Control Card 
Card 4 


BoundvT.ry Description 

a. Upper Boundary (Card 6) 

b. Lower Boundary (Card 7) 


Gas Identification 
Card 8 


Problem Limits 
Card 20 


Mesh Control 
Card 21 


Particle Physical Data 
Cards 24-29 


Particle Thermodynamics 
Cards 30-32 


Start Line Data 
Card 33a 


Start Line Particulate Data 
Card 34a 


The gas properties are input on tape*. Therefore, Cards 9, 10 and 11 are 
not required. 
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Example Problem 5 

prol?lei]ti anali^^^ iimte rate chemistry flow field 

with the following stipt^atioos: 

; /1: V E^ eP^ m 

2. Species mole fr^ctiohs on the start line ar^ to be read from 
■ cards', and ’ ' ■ ^ 

Table 3-l4 presents first a flow chart and then a listing of the input 
data for the specifieid problem. Table 3-15 presents a listing of the perti- 
nent miution,' - ^ 


3-289 


LOCKHFEO • HUNTSVILLE RESEARCH & ENGINEERING CENTER 












i; ,*y»* vdwm **** ' 


Table 3-14 


HEQUIEED INPUT FORMAT FOR EXAMPLE PROBLEM S 


Run Identilicatlon Cards 
Cards 1-3 


Run Control Card 
Card 4 


Kinetics Run Control Card 
Card 5 


Boundary Description 

a. Upper Boundary (Card 6) 

b. Lower Boundary (Card 7) 


Gas Identification 
Card 8 


Gas Properties 


Prandti Number, Absolute Viscosity and 
Viscosity Temperature Exponent (Card 12) 
Gas Thermochemistry (Card 13), Catalytic 
Species Weighting Factor Data (Card 14), 
Chemical Reaction Mechanisms (Card 15) 


Species Mole Fractious on Start Line 
Card 16 


Chamber Condition Data 
Card 17 


Start Line Data 
Card 1 9b 


Problem Limit s 
Card 20 


Mesh Control 
Card 21 


If species mole fractions are input on tape (ICTAPE=1) Cards 16 and 17 are 
not required. 
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I 

I 

I 

I 



0 












Table 3-14 (Continued) 


Cards 

1. A . • , J 


O/i t..,)WL ♦ U/F=r-.i; • FINI1L UATu 

* kMVl LCJUf 

f 

vam U/K 

i 

1-3 








Card 4 

' ^ 

i;. Id 1 

-i" i 0 l OJ 

50 21 

10 0 c 

1 00 J4J + LI 

Card 5 


JO -a 

2i 0 0 2 1 

1 




Cards 6 1 

h' > 



• i-679AV2 

*.040 /an 6 

* «?Obl ooo7 

• 037376 

Card 7 

1 *, 

l 




6* JJjJ 
6*3323 

* *03767;, 

Card 8 

r iwi n 

HATfi 






Card 12 







t 




0*0 






#0 ■ 

^*0 

0*0 “■352 

bO# 

.1976 

• 106 

-•246 


I 00 • 


*210 *»23h 

1 bO • 

*?4bb 

■ 40b 

-* 1*'9 


;i:oOr 

‘1 • iibii 

■ m 720 "• IbO 

2bO • 

1 *620 

1 *046 

-.075 


JOO* 

iieObA 

1*372 *00^ 

AOO* 

2*6bl 

2*075 

*260 


bOO* 


2*Vcd4 *StiV 

600* 

A. 036 

3.471 

• 947 


70Cs 


4 a i 26 1 • .'iVr: 

600* , 

, A*7A0 

4*739 

1.631 


lOOOe 


2*b24 

I £.00* 

b*A30 

6.609 

o . oh 3 




. 7*o6l 

* 6 C 0 • 

b.721 

e*4i 7 

6* 


iiiocf 

bat>00 

9*096 7* 27b 

2000* 

b*Q65 

9*71 1 

■ fi .44 f: 


. ^.JvOe 

OeVOO 

i0*b36 l0*21^ 

£iOCU* 

b* V92 

t 1.207 

1 2* OOT 


CO 0 • 

6e0b7 

12*129 

JJOO* 

6*103 

12.70B 

1 /; . _ ..‘6 


,JbOC.e , 

OsloO 

i 3*24 1 lb*0 V/| ' 

A 000* 

6*2!3 

13.693 

20* Af - 



1 6 *0^*3 

-iTatfVb 






• 

OeO 

0*0 

60 * 

3 *97 A 5 

1 V.bb .) 

^ 1 . ■-'■c> ..* 


\0t>* 

7sV^V 

37* /Ob " i *«.»0 1 

1 bO • 

7.97b 

3u* AO *4 



yvo* ■ 

WaCQt 

41*1* 

2 bo* 

6*20ii 

42 



liOij* 


44*b4.;* *0lo 

A00» 

9»6U0 

47* 1 A 4 

*•'^3 


•'^CoV ■ : 

J 1*0 7.6 

1*9&0 

603* 

la.Adj 

5 1 * bv7 

J • 1 J o 


700. 

1 J*UJ J 

1»3*0/J2 

bOCJ * 

lb*OAl 

tib.bAb 



• lO'.'C. 

17*1 to 

'J / * 1 A » V * f ' : 1 

1. 00* 

16*6A2 

62*a^^4 

12.733 

Cards 13 

r^cui^o 

b D # 4 ,j J i (> * C.1 > / 

loco* 

2U tbl 

6b* 19 1 

2C. /72 


ILSliC# 


Vp ■ 7’'0 

. 000 * 

22*b62 

73*076 

29 * JuC 




V'jg>'79 JO * *4- 1 M 

^-^600* 

*;3.75a 

79* 162 

43*474 


3 Oi; c * 

< A ii 3 

<*it • j.O 


24* A9J 

B4*9/;0 

60*^'a9 , 



iiAal-j^b 

af»000 

^*000* 

24.901 

89.673 

77*690 



-2t>*42 




- 


s 

C^eVbO ■ 

3y,tol3 -J.57^ 

bO* 

6.V66 

39.613 

-1*379 


toe* 

; ■Cj.VllO ■■' • 


1 jO » 

6f9bo 

42-0£:4 

-1.031 


iioo- 


A A* A 05 -Oebti.i 

iit>D* 

6.961 

45.646 

-0.33b 


.^00* 


A/*r;ti7 0*0 10 

A 00. 

7.013 

49*266 

0.71 1 


boo- 

“'VU 1 

bOsbAJ IsAlV 

ooO. 

7.276 

b2* 162 

2. 137 


70C« 

7.a-tQ 

b3*2b7 .j.b7o 

6U0 • 

7*624 

64.293 

3.627 


JOO-^e 



i2u0* 

b • 1 6B 

57*496 

6.794 


MCO* 


rib*7bb bsA£40 

louO* 

6*460 

59*393 

10*130 


ltJ03# 

0*vOi 

60*abb IUBj» 

aoooi 

tl*664 

6! *U07 

1 J.66 1 



* > • 

oJsOiiA lO#17'.j 

j600* 

6 .62n 

64* 102 

la->3i:j 


I'OO j# 

*isU7“ 

tib*37o 22*357 

3300* 

b*yj7 

66 * 2*:0 

kt. * 032 


1 00 * 

L*'f f \ 


AOOO* 

9*0JA 

67 . 946 

Jl *3J6 


111. 

* mC\U 

U* 






* 

Lis 

' 'Z *» - 1 * f A 

,*0* 

b*393 c:a *049 

- 1 • b 3b 


V Lrf • 

tj * 

■j/5 2A#jii7 “ 1 • 26b 

I'.tO* 

b*4tb ^6*b66 

-0*994 


J ‘ « 


;.ld /iO* ->20 “OiOOi** 

2-0* 

fa* I^Ot: 

1 29*996 

—0*331 


' c -■ f 

OeOS-4 oU^bt 0*01 J 

A.; c.' V 

6.97-j 

r 33*247 

0*707 

. 

V ■ ' * 

l*‘4r;ij 

OJO* 

7.005 

1 36*C«2 

2.106 



f** 

i 3 A J 7 • 1 f> 5 i, * t,>0 u 

L)'. , 0 • 

7*.,m7 

*107 

J . b 1 4 


1 i » 


» J ** 

1 '* 1 » ' * 

f’* .■ 

A 1 # ‘J 33 

o * 404 


1 ' . ' ■ 

^1,^- 1.^17 7*vctt 

i ' - 

/sr. > 

1 7 

9 . 4 4 ‘■j 
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Table 3-14 (Continued) 


Cards 13 
(Cont'd) 


IbOOa 

ba0l6 

44 . 1 

11.040 

2000., 

b • 1 9*4 

4b. 004 

i2*6^il 

a300a 

a#43Z 

46.160 

lb. Ib7 

260U. 

6*649 

47*21^ 

17.70b 

3000* 

dabs'll 

46.46b 

^il.dllO 

3400* 

9.0 

49.6 

23*000 


* 9a J 

.60*6 

26.00 

4C00. 

9.4 

63*0 

2B.0C0 


jiti.016 -67a 

79a 

, 





• 0 

OaO 

0.0 

-2.367 

bO. 

3.9b04 

lb. 190 

-1.974 

lUUa 

7a90l 

36.396 

-1 .bbl 

IbO. 

7.96b , 

39.lb6 

-laid 

£00* 

7tV69 

41.916 

- .764 

2bO* 

7*99H 

43*b3b 

- .384 

300* 

6.037 

4^.166 

.016 

400# 

6. 166 

47.464 

• 825 

tiOOa 

ba4tb 

49.434 

1 .6b4 ' 

oUO. 

6.676 

50.691 

2.509 

700* 


5Za-i49 

4. J90 

boo« 

9.246 

53.464 

4*300 

tOOCa 

9at4bl 

5bab9l 

6.209 

1200. 

10*^44 

57.440 

b.240 

UOO* 

I0a9rt7 

b9a09£ 

lQ.4b4 

1600* 

1 1 .462 

60*b91 

12.630 

ItiOOa 

U.669 , 

6iaV6b 

14.964 

2000. 

12.214 

63.244 

17.373 


‘ l^ab.>4 

64.971 

£1.104 

2600* 

I2*9t>b 

66*b40 

24*945 

JOCfOe 

tJ.404 

6tta4tfi0 

40.201 

4^00. 

I4.b03 

69.698 

34.224 

3600 • 

I4a069 

70afc^G0 

4b. 400 

4000* 1 

14.B60 

72.340 

44.805 

NH3 

l7*040bl -10 







■ C 

0. c 

0.0 

-2.404 

bO. 

4.97b 

Id. 604 

-2.006 

100# 

7.9bO 

3/.aio 

-1.609 

ibo* 

6.007 

39.975 

-1.21 

L>CUf 

b.064 

4^.740 

-o.bl 1 

2b0« 

6.29b 

44.412 

-.39 

300# 

UabH6 

4b.0bS 

.016 

40O* 

9.24 1 

46.643 

.903 

-3C0* 

10.046 

60.7UO 

I.B67 

600. 

lo.bob 

52.679 

2.909 

700. 

U.bJb 

64.400 

4.027 

boo. 

12. 22b 

b5.Vi>6 

5 • L 1 5 

tOOOa 

14.407 

bdabbl 

. 7.767 

l£00. 

1 4.!3bO 

61.404 

10.592 

l»5t00* 

lb.4o0 

64.71H 

14.696 

1600. 

to.cOb 

65«b,>4 

16.7t ■» 

lUCOa 

16 . ibd 

6 /.776 

£0«0tJ6 

2000* 

17.220 

69.006 

24. 4t,w 

a.iOO. 

I7.0£i6 

7<i.0lb 


2600 . 

lb. j70 

74.244 

44 » 1 

3000. 

IVaOOO 

/b.90b 

41 .6-»i 

3400 . . 

19.44 1 

78.744 

47.3UJ 

OtaOO. 

l<Jab7id 

dO«442 

bJ.24b 

4000- 

20* 100 

62.527 

01 . 190 


^b.0u:4 OaU 






* 

S Vt>6 

3b, 170 

-1.379 

bO. 

6*9b6 

36* 170 

-1.379 

ioo. 

6< 

3b, >70 

-U479 

IbO* 

6 .966 

40»b86 

-1.031 

iJOO. 

6. W 


-0.064 

2 bo. 

6.969 

44*402 

-0.335 

300* 

6.V6I 

4t),ei3 

0.Q13 

400. 

6.990 

47.618 

0.710 

^.^00* 

7.06^ 

/»V,3U6 

1.4 14 

OOO* 

7.196 

50*6r*v 

2* 125 

70C* 

7«3:»0 

Si.UOO 

2.U64 

bOO. 

7.bl2 

52.796 

4.596 

looo. 

7«eib 

^A«U07 

b.l29 

1200. 

b.061 

55.9bb 

0.716 

1400. 


S7.A12 

6.4bO 

1600. 

6.49b 

bo. 424 

10.015 

ibOOa 

e.tii4 

3V.i<!0 

1 1 .707 

4 000* 

b.60l 

60*222 

1 ,>*4 lo 

t »oo* 

S. 703 


16. 0 1 D 

<600* 

6.704 

62*50^ 

lb.646 

4000. 

0*ui>b 

6i*Tbb 

Ibb 

4400* 

b.bbb 

64.61 1 

24.84V 

3600. 

0.93‘i( 

69*3t>7 

27.606 

^•000* 

6*9b4 

66*341 

31 .069 

coa 

4A.0009 -9<»«0S)4 






* 

0.9bl 

4^.7661 

-1.‘j44 

bO* 

6*9bl 

42.756 

-1.543 

100# 

. 6.961 

42 . 7bb 

« 1 .644 

IbO. 

7.407 

45*264 

-1.179 

JOG. 

7.744 

47.769 

-O.blb 

2b0* 

b*31b 

40*440 

-0.4C0 

30C* 

b.696 

61.137 

0.016 

400. 

9.877 

53*840 

0.95c 

;jOO# 

10.666 

60.1^3 

l.yfcl7 

60 0. 

1 t .410 

5U* 1 £>6 

4 *067 

700. 

: 1 .646 

59.910 

4.t:4b 

600* 

1 2 . 294 

61 *522 

'->.454 

1000 a 

ia.9bO 

64.444 

7 .964 

1200* 

1 4.4 66 

66*750 

lC.04ii- 

lACO. 

14ablb 

btt.bbV 

14. J6£ 

I6O0. 

14.074 

70.722 

16.152 

IbOOa 


74.491 

Iti.VbV 

£000. 

1 4 • 4 4 

73.904 

21 .br>7 

^I3p0a 

14.600 

7:>.941 

i::6 • 2 1 2 

4000 • 

14*7*4 

77.740 

JO. 61 3 

40 be. 

14.o7j 

79 . 046 


4^:04. 

1 *+ • 

5 1 *t 70 

4 3 ■ 0 1 0 

46 0 

tbaOiO 

a^a‘,^74 

4'J . .700 

*. OOO • 

lb. 1 19 

b4 . ) 0<. 

b 1 ♦ 5 45 

H 

laOOii » b 








. 4.964 IV., ‘>J 


1 VO. 

4 • V66 I9*4bc — ).2‘: 
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2BZE 





Cards 13 
{Cont'd) 


100* 



-0#9b4 

J&O. 

4*y6e 

83.979 

-0. 

^ 00 * 

*ii06a 


-0#4bb 

£bO« 

4*06B 

86.bl7 

-C* ^v 

■■' ooo* :■>■■. ■ 

4*qi6a 

•■• •,ii7t.423: ■ 

0*00^ 

' 400 * 

4.908 

8U.U68 

'ii 

■joo« ■■ ■ 


, «/9»V6l 

U 003 

600* 

4«va8 

3o • 86 7 

i . . 

/oo» 



l*VVb 

tU)0# 

4 .'JOB 


1 • ' 

1000. 

4 #V6ti ^ 



UQO* 

4.V68 

34.UI0 


1400» 

4*^j6a 

:iti*o/b 

b*474 

IbOO* 

A.'^Ob 

3b. 73V 


rtaoD* 

4#V6d 


7# 461 

iiOpQ# 

4.968 

^ .3^.648 . 

6 .4p;> 

iiliOO# 

4*V6iJ 


y*y46 

^600 • ^ 

■4.968 

3b.Vb8 

1 1 .-36 

300C. 

4*V6^3 

jUtUs^a 

13-423 

3j500« 

^ 4*968 

3V.394 

I4.9r:3 


4.00b 



4000 • 

4.968 

40.636 

18.410 


MO 

3C.008 

ai 

•sa 






.0 , 

0«0 


o»a 

-a. 1^7 

uO.O 

a*8605 

£1*143 

>* 1 .824 

ico. 

7.7ai 


42.CU6 


IbQ. 

7*496 

44*BSa 

-1 .078 

800. 

/.an 


A/.<i77 

-0.70U 

abo. 

7.202 

4U*9:«4 

-.348 

JOO. 

7.138 


&o.:jya 

.013 

4 CO. 

7.lb7 

b£^444 

• 7c7 

660. 

7.887 


t>4.0t*J 

1.44b 

toOO. 

• 7.4bb 

5b *397 

2 . 1 86 

70iV. 

7.6bb 


!>(>.b6>S 

a.94.u 

800* 

7.832 

57*896 

3.?|6 

tt:;«1» 

b. 


SV* jV7 

b. 3 1 3 

uoo. 

8*336 

60*876 

6*^^U0 

00. 

8.4‘^l 


6<J. 175 

. 8.64*4 

16U0. 

8.60b 

63.:>17 

1 0 . 354 

Utoo. 

8.0V8 


64 *33ti 

1 ir.084 

aooo* 

8.789 

65*2^8 

1 J * 2 V 

r T; >0* 

6.83/ 


66,484 

1 o . 4ov 

fcbOO. 

8 • 8 

67.871 

!v, ! V 

.^00 c. 

b.V^ab 


68.849 

A50 

3300* 

8. VV 1 

0'='. 704 

- '.I- - 

■ O-.-O. 

v.caa 


70.'*t:tl 

at'.ov4 

4 000* 

9*Cbti 
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1 /7 ,? , Vi + J ^ 

I74r.'t*7 lt+0.- 
1 7 1 M vvwi.+o,: 

foa 

1 6j 71 3Xit+02 
\ by0i4;.t:+02 
I so7^ii J :i+oa 
l47447bE+02 
I4ll0b‘^£i‘0r. 
l3ja472E-foa 
la6»:ja0C+0£ 
I2.b9a& 


4«0 


• 37S 
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Table 3-15 


EXAMPLE PROBLEM 5 PERTINENT SOLUTION 


su^ewson tc *H*LVS!S uSlWg t he LOC<H£EO>HUHT':vtLLC MULTtKtC SMOCK COHPUTER I'ROCRaH 

■fiAS^pAffffCL'r F Coir SOL'D rf 6 N — — — 

, ... • .. ,CASChO, 2f _ PACE I 

CASE 2| « SOOLOr */t cone* O/F-2,2 » F|NtT£ RATE, INVISCIO, VAR 0/F 


. . 



RUN CONTROL 




ICONI 1 1 

, 3 ... _ 

tC0M(2» 

fcoWm“ 

?! 

t'COHtVI 

2 

U0f4<S> 

! 

— ^rtbUT»7“ rcDDiTT tcdwebt 

9. i ^ 


1C0MI9I 

0 

ICONIIO) 

50 

ICONdil 
2l " 

IC0HJI2I 

1 

ICONllj* 

0 

ICONtlNI ICONilSl ICONIIAI 

0 - *■“ ■ 0 ' 3010 • 

l. = 

FLO* CALCItLAtfoNS ARC~IN eireTT 

s'rt units’ 

STftH tnE"T:)r 

■coDIfOlRAtES' 

tii feet 

^ ^ — _ — ^ _ 



^ TM£ FLO# ricLP data rill' ec hritten on tape 

T ... . 

0"PER boundary 


type 

|TR*MS 


5 

c 

0 

• t 

mai 


1 

•0OD30 

•00090 

«ooono 

•2A79E400 

t 1^01 

“TTOSI-TTCrff 

3 

0 

• !9*fnn+c2_. 

••_1000*01,. 

• tlOQW 

•00009 

__*00000 _ 

.83333«01 





LOAER B0> tJOARV 





ITPAMS 

a" 


C. 

_ D " “ 


“"MAX ■ 

2,.„ 

0^ 

*ooDnh 

»00000 

•ooof.n 

•00000 

•oonod 

•83333*01 






; 1 1 "i 1 1 r h 






yni ri irl*i 
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Table 3-15 (Continued) 


SPECIF ThCRHOOVNAHIC AMO REACTION 0 *TA 




" 1 » j * NM j ICfAFE |K«UP # 1 D I D 0 « 2 i| |6 23 J 

I b i F ^ ^ 



PRANQTl number • . 70000000*00 

.BASE VISCOSITY - , . 11 ) 651 19 A- 0 S 






REACT 1 OnS_ BE | HG_ 

CQNSlDEnCD 



1 

H 

♦ OH 

♦ Hi 

• H20 

4 

HI 

7 

0 

♦ H 

Hi 

• OH 

4 

Mt 

3 

0 

0 

♦ Ml 

m 02 

4 

HI 

^ a; 

H 

4 H 

♦ H7 

• H2 

4. 

H2 

. S 

' CO 

♦ 0 

♦ H3 

• C07 

" 4 ' 

H3 

f ^ 


♦ H 


*1^2 

4 

0. 

^ 7 

OH 

♦ 0 


* H 

4 

02 

ft 

OH 

♦ «z_ 

. 

■ H70 

4 

tt 


K!*i»*E*P I 8 /bt**h> /t* • 


9 

10 

II 


OH 

OH 

C»9 


♦ CO 


OH 

H 


C02 

H20- 

CHS 


♦ H 

.♦.0 


13 

n 

CHT 

-JCH 3 

.4 

_4 

0 

0 

■ CH 3 . 

■ ch?o 

~ 

4 


CH 20 

4 ’ 

Oh 

• ChO 

4 

lA „ 

CH 20 .. 

_4 

H 

• CHO 

- ♦. 

17 

CH 20 

. 4 - 

0 

• CHO 

“ 4 ' 


HZO 

M 2 .. 

OH 

H 


I« 

CH 70 . 

* HI 

. Co 


|V 

CHO 

♦ OH 

• CO 

4 . 

20 

,CMO 

♦ H 

CO 

4 ■ 

21 

CHO 

4 C 

■ CO 

4 - 

. 2 ? 

; CHO 

4 02 


1 

. so 

CHO ^ 

♦ MI 

« CO 

4 i 


H20 

H2 

OH 

«2 . — *_M1. 


HzO 

H2_ 


OH 

H 

H 


•H A 

H 

B 

H: 

H-TTPE 

It-TYPC 

2 « 2 | 4 * 2 ? 

2*0 

•d 

iO~" 

2 

2 

7 * 260*15 

• 0 

•0 

• 0 

2 . 

1 

1 * 379*18 

1*0 

•sNo.ir 

• 0 

—f - 

” ^ - 

i*oi^*in 

1*0 

*0 

*0 

2 

t 

7 * 26 ^*m 

*0 

•HOOO.O 

” ■ *0 

2 

y 

a*H 35*04 

• 1 «0 

• 7000.0 

*0 


: ft' ,’ 

2 **u 6 *t 3 

*0 

• 0 

. 0 ; 

m 

1 

6 * 025 * 06 ^ 

• 2*0 

- 2700*0 

*b 


ft 

6 i 627 *ni» 

• 2 *ti“ 

lAQO^O 

*0 

.1 

■■ ft ■ 

^* 025*12 

*0 

: ^-Hoo.o 

*0 

1 

3 

2 *S 37*13 

• 0 

• 5000.0 

.0 


3 

loft<IA 4|3 

• 0 

-SOOO.O 

*0 


3 

7' 109*13 

' *0 

• 9100.0 

.0 


3 

64627 * 13 ^ 

*0 

• 0 

• 0 


1 

S 4 ft 22 *il 

-* 5 ^ 

• 0 ~ 

• 0 

1 

— J - - 

1 * 325*13 

*0 

•SBOO.O 

ia 


3 

9 * 6 Hn *10 

tO 

*0 

*0 


I • 

2 *i 09 *l 6 ^ 

• 0 ' 

• 35000*0 

*0 

s 

3 

1 . 265 * 19 ^ 

• 0 

•0 

*0 


1 

§* 00 !* 13 _ 

*0 

- 10000*0 

• 0 


1 

|* 265 *t<l^ 

#Q 

•b 

• 0 


— 


* Ml 


•§*00!^IS 

7»230*IS' 


• O 

■.o“ 


•|AQO*0 

•l&000«0' 


•0 


7 

S 


i 
^ 3 


catalytic SpCctES being considered 




.Irf 00 ..c_ 


j_J-*OD CH5_ 
t I *00 H 


2*00 C 02 _ 

. 1*00 HOQ..CHO 


_»„!*00 CO 
• I *00 NO 


t 1.00 OH 


• 3.00 H2Q. 

• 1.00 0 


• 1«00 KH3 

.^i«00 02 


• 1*00 N3 
•I *00 CHS 


-HSL 


J-aDO_£_ 


3.00 C02 

.1.00 CH20_ 


t.OO H 
.1*00 CHO 


t.OO NO 


.10.00 h2Q 

1.00 0 


« 1.00 NH 3 


t 1*00 02 


4 


1.00 N2 


i 1.00 CHS 


.US. 


*•00 c_ . ..„J_|.00 CHS ,1.1.50 CO 

3.00 C02 t 1.00 H t l.bo NO 
- I.QO CH20 • . 1.0 O. CHO 


I I.QO H 2 
I 1.00 OH 


•tO.OO h 20 , 

t 1*00 0 


• 1*00 NhS 

• 20*00 os '" 


• 1*00 NS 

• UOO CHS 




E=3 C=3 t=3 C=3 C=3 C=3 C=3 


CS3 SS3 C3 CS C~S 








■ i 
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. - . ... !' ‘^l1P! i roTO ] W 'U 


C=3 C3 C=3 t=3 , t=3 (S3 : (S-l :(S3 


_ 5J»rcfF «0^.r FR4CT TOWS ON Tne start ^ ^ ^ 

_FO!NT .:: 

,1 C jCW CO H2 


^ CW CQ H2 N2Q : NH3 H9 ' • •• ■ " ' ' 'H ’■" 

g 7 '» 700 - 0 I • 2 o 7 a 0 ^ 0 d * 63820*03 gRTTso^OO / 8 S»oO *03 ; *I 7 570^02 • 2 ^il 0 ^ob ^'OOI'^ 


•ooqoiT 


' I 

OH 

0 

_ 02 

cm3 

cwo 

chO 


aOOOOO 

>00000 

•0DC08 

" ^opoo' 

#00000 

■OpOop 

2 

c 

CH9 

CO 

H 2 

"Hio 

““mms 

— 

. ^ .79IQB-0I , 

.|A990*00_ 

_> 63360-02 

#^38606017^ 

i6999(J.n2__ 

• * i «90|i 

2 

O.M 

0 

02 

cm3 

_ CH20 

tHO 


•00000 

* 0 «K 100 

•00000 

#00000 

•obooo 

T 66000 " 

y~ 

” ' c 

"chi “ 

CO 

^ M 2 

~ Kzo ■ ” 

NM3 

» 

, • 57070-0 |_ 

_>t2^70*DO 


!L?7®‘|0*0O 

•I 6 &S 0 - 0 I 

■ 888 S 0 if 

3 

r 

OM 

0 

02 

cm3 

CM?0 

cho 


N2 t02 ‘ iH~" 

»> 7 B 20» 00 > 1 0310*03 > 000 tO 


NO" 

*00000 


Mir 


C02 


NO 

*00000 


• ODOOO 


«oooDo «doo^oo ■: .■■ • • ■■■■.. ■ ,■.•■ ■ — ' '■ ," ' ' . — — — 

^ ^ CH*r ‘ to ; H2 ^ H20 ;■ • N**3 "^^N* ^COZ ! HO 

>00000 ?^2630*|H f^^^io+oo^ •A0060-0l__ #3501 0-*03^_£>ZSt^i0^ •12l70*03 >7BW5D' 

® 02 . Ch 3 _ CH 70 CHO 

vodooo 


-ro— 

vO ** 
nO 


OH 


* 70 ^ 60-05 #00000 

CHR 


C - 

fooooq 

OH 


•ODOCO 
CO 


■ 00006 ^ 


HZ 


02 


• nsiD *02 «Z 766 b<» 0 H * 1 73 Vd* 0 M vonObo 


'Tfc H 20 nn«j 

^32^60*06 « 157R0*p0 ?.? * #21 ^So*00 #2RS2o-pW^ ^ 28330*00 tZlZRO-bl *ZSHO*0? *12^ 

CH 3 CH 20 


7ooobb 

NH3 


N2 


COZ 


' N 


NO 


04 


03 


•OOpOG 


_cho 

#00000 


A C GHR 

. .. . - # 00000 _ #00000 


HZ H20 ^ HM3 : COZ- ’ '||^ "■ " — ' NO 

-*|Z??0*JLO # >5Z7o»oq__^3Hi6Q»po_ . yiiaOTO*p S #3 tbSD*Qb > RNabQ^Dl__*|OtOO>Qi #233^^ 


■oz 


_.?H 0 02 CH3 

• 11 SI 0-01 # I oTRO-bz • I fnnro^^Sz iboooT 


7 

c 

CH9 

"cb ^ 



#03000 

• D'tCOO ' 

•86030*01 

• 

7__ 

OH 

0 

02 


-9 — F 

•Z9I&0.91 

• J9T9diTfir 

t 

*12170.01 

• 1 


H7 


CH3 

bbOoo 


_CH20 

#OpOOD 

“ H20 


__CH20_ 

#00000 


CHO 

^• 00000 '“ 

M«3 • 
•00000 


n2 ‘CoZ ”H* ":r — ^ NO “ 

> 32 T 0 O* 0 O * 71480*01 # 127013-01 •OIOTO* 


CHO 

rooOdo 


>0^000 

OH 


#00000 


•SR79Q.01 


H2 ■ H20 ~ NH3 “ 

3 M S 20 *Q 1 # 3 6 ^ 90^00 #09000 


* 4 O 3 b 0 * 0 |v # 94100*02 #192904 


02 


►01 


0 02 cm 3 

f 39 1 60-0 1 #67*750-02 03730*01 JOOOOO* 


CH20 


CHO 

rodooo^ 


•DOObo 

NOTE: Some points have b^^en omitted for demonstration purposes* 
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Table 3-15 (Continued) 


20 

OH 

0 

0? 

CHS 

CH70 

cho 




• 1 7030*02 

•33^00*04 

• 21 2d0*O‘i 

*00000 

•00000 

•onO'oo 



2 1 

C 

CH4 

to 

H2 ^ 

H20 

NHS N2 ~ 

cor 

H NO 



.*00000 

*79950-07 

* 19080*00 

*2|T20*00 

•30 >26^00 

«879s6-QS *30130*00 

*330t0*0l 

_j*95300-02 *17100*03 

21 

OH 

0 

02 

Ch3 

CH20 

CHO 




* 17030>02 

*33fl00-0*l 

*2]28Q-09 

*00000 

•boooo 

• bnooo ' '■ " 



CHAHflEH 

pressure ' 

iathj • ■ '«~iHoiq*o2 chahrer 

temperature {DEOvKI i” 

*32361*09 

_ 





“tHERE ARE 

b PARTICLE 

'Species present tm the oAS-pARTtCLr'HiXTURE 

• 


STiW cutoff iNFbRMiiTlb'N^ 

ftOUMOARY ^ ^ tOWER BOUNOARV 

«2S000«01 X« •OnODO theta* *00000 • ' q* *00000 ~ ' Xq *AOOO0 <»OO~ theta* *90000*02 


THE’ H£SH COMSTRUCTION' <N|LL bC CQRTROLEO BY THE FnULO’TINO VARTABLES ' - , 

■PL... 1 NTE-R 1 0.^* *ISD«»Bi ox AXIS* *|SO«Bi BL LtH* *000 01, DELETE* *l6o-Oq 0E6 P«H** *900*01 f* •37S*00 






AM***®s»*rty 


|:K3ssn»Js^ 


cn cn cm 






Table 3-15 (Continued) 


SU»>e»»sewiC FLD«> AW>LTS IS using ThH LOCKHCEO-HUNfSVTLLe MULTIPte SHOCK COHPOTER 

G«s.p ARTICLE rC6« SOLUTION " 

: CASE NO, _2| _ . 

CASE 21 . SOOLOr A^t_CONE» 0/f>2,2 »' FINITE RATE, {NVISCIO. VAR 0/F 


PROORAH 


PAGE 2 


line point OSCRIP - REGlHg 


HACH angle 
TO* 


PRESSURE 

.. PO* .. 


density 

S* 


THeTA 

TEMPERAtORE 


entropy 

;*rTffRsT; 


VELOCITT 


H.TOTAL ITR 

JCK" AWCC E — 


¥ 1 INPUT - CONTIN * 00000 ,8s1AY-02 

•7aTsS*62 ’*27S17*03 

. ^ .21&A0»0S «6|S2S*03 

chehical specie mole fractions 

C 7,s»e5-(j2 CHR 2«07SI*0| CO _*,30 ?r-OR 


C02 S.A3&R»0A 

CH20 0,0000 . 


OtOOQO 

. 0*0000 


• I027<t*0l 
•5R9l?-02 
•00000 


•ooono 

• I8993*0R' 


•00000 

•37993*0S 


4.302R-OR H2 
0*0000 "oh 


R,3iS3*0| H20 

o»6ooo 0 


R,570S-0*t NH3 

0.0000 02 


•310S2*0S 

•I2A«0*OI 


l•^57l'03 

O'oodo 


•1322S*08 0 


N2 2.03|2*Ol 

CM3 0*0000 


INPUT 


CONTlN 


.I9S&U02 

•7ft33A*02 

•2200A*0H 


’^che:mcal specif hole fractions 

C 7.^10M-o2 CHH 1.899I- 

C02 1,0311-QR HL tta0a0.O_ 

CH20 O.QOCO CHO 0*0000 


•RHl 47-07 
•27*»S0>03 
,S|4t79*03 

’4*3343-03 H2 
JbPgOfl OH 


*10291*01 

*63472-02 

•00000 


r7H4?S*00 

,I92>|2*0R 


•00000 

•3B240*0R 


9*3847-01 
.0*POPQ 


4, 9993-03 
0*0000 


T3i9e5*09“ 

•12712*01 


!• 1891-03 
0*0000 


TT29fl9*oe “»r 


n2 2.7021-01 

CH3 0*0000 


. _1 .. . 3 INPUT - CONTlN. ,.*3 sI22-02. 

*77429*02 

*2 3059*06 

CHCMICAL SPECIE HOLE FRACTIONS 

C .5,7079-02 CHS 1*2971-0 1 CQ 

C02 I. 4^71-03 H 9*0000 NO 

CH20. 0,0000 , . CHO 0*0000 . 


_ *89147-02 

*2797S*03 
.SlSQ 7*0 3 

_4j299«j-02 _ H2 
0*0000 OH 


*10230*01 

•50759-02 

*00000 


.15011*01, 

>2073S*09 


*•00000 

*37591*09 


9,7093-01. 

o.boco 


1.4651-02 

0*0000 


*32924*09 

'•12875*01 


8*8894-09 

0*0000 


*11245*08 0 


n2 2 •44 12-01 

CH3 0*0000 " 


I 9 INPUT - CONTtN *58482-02 

•. *70254*02 

•3o949*C9 

„ CHEMICAL SPECIE.MOLE FRACTIONS 

C 0*0000 CHH 2*2433-02 CO 

CO 2 7.mi9-B3 H 1. 2171-09 NO _ 

CH2C 0*0000 CHO 0*0000 


*89147-02 
_.2727A*03 _ 
*51203*03 

T7 *4 t'z-oI mF 

2*8953-07 OH 


•10219*01 

•93259-02. 

•00000 


>22949*01 

.24733*09 


*00000 

•33949*09 


9,8514-01 

7.6 248 -04 


4.0047-02 

0*0000 


T35i92*09* 

•13038*01 


3*S0|9-09 

0*0000 


•;?T2«ii*07- 


2* 5733-0 r 
0*0000 


NOTES: (1) Tjrpical printout for the startline data surface. 

(2) Some points have been om’tted for demonstration purposes, 
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Table 3-15 (Continued) 


StlPERSOW t C FLp*f AWCLYStS US t W g The LacKHE£D-KUM7SVn.Le HULTIPlC shock COHpUTER pposrah 

■” : ^<cs^ p* R f I ccE~PCbii"soi:urrow — ' — : — 

. ■■■ : . * Case no, at 


'*SE 21 » sootBP V/» COME * o/r«2,r t f ihite rate; imviscio, var o/f 


LINE POINT DSCRIP - REClHC 


Hach ancle 

TO# 


&0 


I WALL - COMTIN 


•aoOBO 

'r29flSS#02 

.?7gOI#OS 


rHEHICAL SPECIE MOLE fractions 
C 7,s 7R5-32 CHR 2>07at-0| 

CO? 5.A3AR-tl& H S.R528-I9' 

CM?0 5.l72S-tO CMO l«13SI>IS 


■pressure 

PO* 

_.*2772“0I 
• *5 1 20*02 
•35369*03 


DEHSljy 

S» 

•20063*0l 

•I7R5r*02 

•00000 


ThfTa 

T^hPeRTTI 


■00000 
. I38?5*0*i' 


ENTROPY 


.91272-05 


VELOCITY 


•52997*01 

•13011*01 


PACE 95 


n-total 

IC"ANGlE* 


•I3I99+0R 


C0_ 
NO . 


6,3821*09 

0*0000 


ITR 


H2 

OH 


9.3153-0I 
I. 7397-25 


H2fl 

.0 


0.5705-09 

*3;9207-35 


nh3 
02 ■ 


1*257 1 *03 
0>0000 


N2 

CH3 


2*0312*01 

3.0251>ia 


60 


21 WALL * CONTIN 


•51^39-01 
•3g733*02 

■ ■* .56039<*09' 

chemical SPECIE HOLE FRACTIONS 
C 0.0000 CHI ' ' 9.9609-08 .'~C0~ 

C02 3.3906-02 H 3*9555-03 NO • 

CH20~ V.sias-O'R CMO 1*9111-05 “ 


. .5S9S2-0I 
_ *70385*02 
*35510*03 

T; 9019-0 1 

l«Tl 20-09 


*rVS66*6l' 

•10656-02 

•OOOOO 


"n^ono*02 

*37807*01 


T77omor 

*25158*09 


H2 

OH 


2.1811-01 

6*3011*01 


H20 

0 


3*0l92*0t 

6*1868-06 


NM3" 

02 


"TS7S22*01"' 
*125 1 8*01 


8*3018-06 

1»3108*06 


• 36975*07 3- 


N2 

CH3 


3.0185*01 

1*9276-08 


. . • PRESSURE Integration results 

FoRCEX FOrCET TproT ' nELFX DELFV ISP • 

-*97005*03 *00000 ;U?0UO -* | 10Q7*Oi ’ *00000 *21227*03 

... **.. • " 8 LL - CQHT IN *00000 * 81033-01 *20292*01 *00o6o *91339-05 *52717+01 *13195*08 3 

• 29808*02 *83180*02 *17115-02 ;i372R*0i ■■ "*37993*09 ~*I3019*01 

•22220*01 *39087*03 *00000 

chemical specie mole FRAClf^iONS' ■ * — 

— — 2,1785-0 2 CH9 2. Q781-Q I CO 6*3821 -09 H2 9,3153-01 H 20 8,5705-01 NHS 1*2571-03 n2 2.0312-01 

C02 5.6361-96 - H 3*3760-19 HO O.'OoOo'' OH i. 5902-75 6 " 3*?2r2^3'^ 02 0*0000"^ CH3 2*9582*18' 

CM 70 5.1736-10 CHO 1*2096-18 ' 


61 21 WALL - CONTI N *52095-01 *57151*01 *19735*01 * ■■.15000*62 i7eil0*02 "".679I8609' “ “ •34068*07 3 

; »-3o 11 S*02 *881 29*02 *|01|A-02 *37597*|)i *25158*01 *I252]*0I 

*96055*01 *3s068*03 *6o6o6' ■ — 

chemical specie hole FRACTrONS _ 

C O.COOO CHI i.9635-08 c6 i*9oi5-0| — • - 2,i6i9-6i Hio"^ 3*Oi9o*bt NhS 8*3017-08 n2 " 3*0185-01 

C02 3*3815-02 H 3*1353-93 NO J*7|2g-01 OH 6*1685-01 0 8*3010-08 02 1*2352-06 CH3 I•9I07•08 

CH20 9.2718-00 CHO 1*1215-05 


_ • PRESSURE INTCGRATIOH RESULTS 

FORCE* FORCEY T0R02 OELF* 

; : '*?!'*p33*0^ *00000 *00000 .*11031*01 

NOTES; (1) Typical printout for a data surface inside the nozzle, 

(2) Some points have been omitted for demonstration purposes. 

i MM §m tm M ^ ^ ^ ra » C3 nzi ra ^ 


oeLfy 

•OOOOO 




ISP 

•28301*03 


■' “-■■mrrrririniniir r ' n i r-iii i iiM i ii iii i iii ii i ii ii 

I tsagaa gnawirrt 

[: . . s 


Table 3-15 (Continued) 

SUPe’^SONtC FLO'V ANACrSIS USING THF LOCKH££D»HUi^TSVtLLE MUtTTPtC SHOCK tPHPUTCR PROORAH 

G A s - p A iTt 1 Ctt'~yC6^s6L^ tT 0 R 






Case no 


21 



PA6E 



,JC*SE_ 

21 SOOLRE S/I . C0«E*_0/F»2,2 « FtHlTE 

rate. invisCio. 

VAR 0/r 



' 



tiNE 

point- oscrip 

- RCGlHt R 



H 

THETA ENTROpT 

VELOCITY 

H- 

total itr 




“ Hash angle 

1. PRESSURE 


OCNSJTT TFHPERaTURC ^AS CONSIh ' 

XOCAL 6AMMJ1 SHOCK 

-A HOLE 
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c 

C 

O.DOOO 

CH*i 5*0539.00 CO 
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H20 3.0133-01 . NK3 

0.3000-06 
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CHO 9.9030-05 1 

* 

.. . . 

> 

... - , . 




r- 

m 

UJ 










3P 


2& PRN^HR 

- CONTIR «9]7S5-0| 

.205|T*b6 


*37735*01 

,3391^02 .129ST*03 


*3*109*02 - 5" 

rn 

t/i 

o 


♦15377+02 

•27979*0I 


•03120-04 

.19277*09 .25195*09 

•12999*01 



2 

(JJ 


^46307+04’ 

.50247*02 


•OOOOQ 


—r 4. . 

■ “ 


XP 

o 

X 
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H2 
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'"0.3000-06 
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3.0100-01 
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0 1.3375-06 02 

1 .4912-06 
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H 2.9995-03 NO 

I. 2129-09 

OH 

1. 1603-09 

0 1.3325-06 02 
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NOTES: (1) Typical printout for a data surface containing a Prandtl-Meyer Expansion. 
(2) Some points have been omitted for demonstration purposes. 












Table 3-15 (Concluded) 


SUPtRSONIC FLOW ANALYSIS USing THE LOCKHEEO-HUNTsvTLLE HOlTIPLE SHOCK COHPUTER PROCRAH 

“ - gZ S=PA R n CiTE'TCrW" SoPJTToW' /, . , 

' CASE NO, 21 


CASE 2| « SOOLPP 6/1 CONEi O/Fj»2*2 i FINITE RATE. |HVISC|I>. VAR 0/F 
LINE point DSCRtP - BE6 |He R X 


NACH angle 
TO* 


PRESS"RE 

PO* 


H 

DENS I ty 

S* 


TMFTA 

TESPeRATURr 


ENTROPY 

rA5*mBSTr 


VELOCITY 


LOCAL CAHMA" 


P AOE I i s 


H-TOTAL ItR 
"SHOCI^ANOtT 


X 

fn 


X 

c 

z 

0 


■ •I350^t01 


•l3t87«0S 


J • ^ONTIn •OCCOQ ^_.223^l^0O •2962A^f3l aODOnO *91677-05 

<19590*02 *12303^02 #50779-03 #9|633*03 i37993*09 

- #2351 8*09 •1«m^7<'03 *00000 

CMCKiciL SPECIC HOLt r«6CTtON5 ” 

C 7*^755-02 CHS 2#078l-0f CO __A,3o?H-OS H2 S«3iS3-0l HZO 

C02 5.636S-06 H l#266S-7i »|0 ’ 0*0000 OH « S«36S7-29 0 

CH70 5.1793-10 CHO S*3579.|e 


e*5705-0S 

OtOOOO 


HH3 

02 


I # 2571-03 
0#0DQD 


ft2 

CH3 


2.5312-01 
I # 967^5-19 


3D 

n 

w 


3D 

O 


Z 

o 

z 

m 

m 

37 


O 

n 


m 

3 D 


in free"60’ ^ ContIn 


W'l2> 

I 

o . _ . . 

•^^CHFUICaL SPECIE HOLE FRi^TIONS 
C 0,0000 CHH ■ 'fi,o&so-oa 

_C0? 3.50*»6-02 H 2.79R4-03 

CH20' 2,2B2S-0a CHO 


,99084*01 

,46307*04' 


C0‘ 

NO 


2.49S®-04 


*20T58*bb 
•13977*00 
" '.58590*01 

rii3079-OI 

1.7132-09 


.581 IS'* or 

•B0494-QS 

.OOOrro 


.95627*03 


•25190*09 


H2 

OH 


2.1951-01 

1.1569-09 


H20 

0 


'3.0190-Dt ■ 
1.3377-06 


NH3 ■ 
02 


“n 0975*05 
.1SS|9*01 


6.3105-06 

1*6916-06 


-.36062*07 


-7 


N2 

CH3 


3.0166-01 

1.7016-06 


130 


I WALL - COHTIN 


•09900 

.19571*02 

.23522*09 

chehical specie hole fractions'"" 

C _ 7,9705-02 CH9 2.0761-01 CO 

'C02 5,6369-06 'm l,29l7-?i wO 

CH?0 5.1793-10 CHO 9.3589-1^ 


POUr^lO. 37 ON LINE 129 HAS 6EEN DELETED 
,22900*00 


•29653*01 .00000 .91677-05 .69776*09 *13186*06 

;i'2?98*o2 *5o8o9-o3 T9iY25*o 3 73>Y93yo6 “ynsiT*oi — ' 


.19926*03 
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6.3829-09 

O.OOOO 


H2 

OH 
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5.2150-29 
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0 


6.5705-09 

0.0000 


NH3 
02 " 


1*2571-03 

0*0000 


N2 
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2-6312*01 

U9S75-I9 


130 33 FREEBO"- "cONTIn"' ' .96»87-0i *0776*00 .56109*01 |.6o3|6*b2~ ' .19056*03 ' ' *36069*oY 2 

.99099*01 ^13972*00 .60*79-05 ‘.95650*03 •25139*09 .I3S|9*Q| 

' .66306*09 .58576*01 " .00000 ' — 

ch ehica l spec ie hole fractions 

c“ b.'boob"*’ CH9 5.0652-06 CO TTSSTG-bl H2 2.l9!i7-ol H20 ~S*0l9o-Ol IIhT Trr3r07*C« R2 "'^•OlB7*Or' 

C02 3.5097-02 H. 2.7696-03 _nO ;_1.7i32-09 OH l.i5<»2-09 0 1.3376-06 02 1.*916-G6 CH3 1.701*-06 

CH 20 ' 2.2825-08" CHo" "2.7967-09 '" "" " ' - - - - 



NOTES: (1) Typical printout for a data surface in the exhaust plume. 

(2) Some points have been omitted for demonstration purposes. 
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Exaniple Problem 6 

This problem analyzes a two pbase fihtte rate chemistry flow field with 
the 'following stipulations: ' ; 

1. Free molecular calculations are hot to be considered. 

2. Species mole fractions bn the start line are to be read from 
cards,.and , 

3. The start line is to be input on cards. 

Tahle 3-lf> presents first a flow chart and then a listing of the input 
data for the specified problem. Table 3-17 presents a. listing of the perti- 
nent solution. 
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Table 3-16 

REQUIRED INPUT FORMAT FOR EXAMPLE PROBLEM 6 



♦ 


If species mole fractions are input on tape (tCTAPE=I) 


cards 16 and 


17 are not required. 
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Table 3-16 (Continued) 


Cards 

1-3 

Card 4 
Card 5 


I f-AkTICLl-.i lO" — t.w 1 N.l<Jiri.fc t ^U^i>•tlUUlLU(KHJ^ CHtMISTMY 


Cards 6i 


bard 7' 

g ard ^ 
ii^d 12 


r: . ao id 1 0 

'i 3 Id *00 
Al*0 20*^737U4 0 

OiO 0«0 0 

0.0 : -."ooAaByuB.i 

0.0 -.ooiBOva*.- 

p.Q j •o:)Ob**Aj6i>- 

0.0 *i)U0!j7UCJi.- 

OiO e00O61 

0*0 .aOCAtUa.!:^^- 

OeO ! s0004ib49b- 

OeO ; 

OeO . 

OsO 

OeQ ’ sU00tiOt>779- 

0*0 Oei: - 

S79s0 . 1.4 I 


.0 , -1 *0 • 
sO 4 e4^Vl>Jbl4^ 

0 1 7 W3)it6b6e ^ id 407«ts6 

• ooi: r^:iOb^4voitiob.* 

S 0L4 J f bo6<»0d7M 

. y*i74ybb7.7otj« 1 

S 0^.bOVoW«t^7Qb Jbb I 

s CfCa' VtiQ^»5itb6V.>V^i..t 

• 0^.' 1 V 1 Ot» 

. 0 1 y :i > 0 J • b j IJ 1 :i i u 
eC iboo4t‘o.bi^^*itbo6 
S 0 \ bu.t>0 I 

sO lbbb9i;Je**Vjl 

• OOtiO 1 33:?i400y76b9 

s^B 0*6 


-6etj037b 
I .bib 1^07 
Ub040b99 
I e7bbb7*:a 
l.ebUbiilby 
i*Oii347c;u 
1 *u7oVObb 
i bVOtJtiybb 
1 

U7u9717i; 

UdOt7b<Jl7 

ifda7bl0^tl 
0*0 ^ 


E4bb7ol04 

.3.bl0b74^ 

b.uO^;3ci4j^ 
o*J7t>97ai 
7,t;>j7^V9t> 
bsb4t>b4y4 
104DbOV6b 
I 1 sc^l 
t i.yyvbbi 
l^.6t>7039 

ipoo.o 

10013. 


Cards 13 


BHOriUE 700 PC, 


MKi>. 1 

\ 1 

t / i 



• 70 

•000BV3 

.60 

♦ 


l(p -7 



cu aa.oi i 

-i?Se417 






•c 


i9e6i:> 

-y.ovci 

ioc«o 

bs9b6 

39.613 

-1 .379 

i.CO« 

b.yb|7 

44,s43b 

«*Ue6bJ 

>«Q0% 

7.013 

49.4c3U 

0.*7\ 1 

► oOO.O 

T,.a7fc 


li.l J7 

bd(9*o 

7*624 

•34.293 


icoo.o 

. 7.93) 

i>t3e02B' 

b* loJ 

IHOO.O 


b7*4yp 

6.794 

L^OOsO 

U.34fa 

5bG7to9 

b.4b6 7: 

160OsO 

6.4b0 

b9.39J 

10. ]‘J>0 

iICCO.O 


6U-B07 

U.Bbl 

ci^OG.O 

tiv72B 

' 6.2*63t> 

16.301 


B.Vtt) 

63^397 

■ J7.0t>ii * ** 

£uO0«0 


64.10£ 

tU.plJ 

^OOsO 

d * 4 

64s4’Jr» 

.. ly.bvp 

dbOC.O 

bsti63 .. 

64.767 

£0 

irvOO • 0 

b‘.U7V 

fab»06V 


3000*0 



2<g « 3 yt 

olOO.O 

‘ be9tO 

Obe&fj£.^ 

s:iJsc4d 

3a.0.0* 0 


fc.7 •.66.94b 

£4. i J9 

toa 44 

.oo3V‘j 1 




^-■- 


*o- 



-ii.riJO r 

iOo*<; 



-1 .B43 

.ij, <4aOeO 

' te7^1i 

4 74 76iJ 

-0.tiJ6 

40C.O 

9.d77 

■ :id.Q30 

0 * 9uo 

iioo.o 


^b. 1 

t J.0O7 

bOC#0 

U*si93 


B s4b3 

^ lOCO.C 

I2.yb0 

64.344 

y.yti4 

1 a 00*0 

IJ.466 

viii3.TS6 

to. 632 

1400.0 

, I3.dlb 

bb.tiby 

1 3s 

loco.q. 

l4s074 


16.1b£ 

iJCOd* J 

|4s*4£i4 

Y3.V03 

i!l sdb7 

3<!O0.0 

I4*b47 

. ;7b.2B« 

24.760 

,<;400.0 

] 4s04d 

7o.^.'54 

£7*6/4 

£600*0 

14.7J4 

•* 77.736 

30*613 

^ a /COsO 

1A.77J 

7«.2ab 

vif • o'->«3 

^boc*o 

l4#d07 

^^'7£i).^^24 

33.1^67 

^ i.>OCeO 

14sd4 1 

^ ^y*344 

db.04y 

3000*0 

l4*b7J 

79.B46 

J0*b3S 

00.0 

1 4. 

tiO. 

33*034 

3300 sO 

14*930 

BO.BlO 

39*bl6 

M > 1 

.007^7 

bdmioo 



, 



^4 0V 

4.y6b 

.Vbti 

- 1 • 4p i 

100.0 

4*96b 

21.96b 

^0*964 

«^oo.o 

abybti 

^b.40o 

-0.4btt 

400* 0 

4.96b 

2B.BB£ 

0* B06 

oOOeO 

4.yibb 

30.b67 

1.B00 

boc*0 

4.96b 

32*296 

2*493 

1000.0 

4 s VO^ 

i3.4Q4 

*Os4tJ7 

1300*0 

4s9toU ^ 

. ,34.310 

4.4B1 


4«yc3b 

3b .070 

b.474 

lOOO.O 

4*960 

3t).7J9 

6.46U 

i-t.0 0.0 

4*VOb 

J o . b 4 p 

0*4pp 

00*0 

4*vpa 

37.J22 

9*449 

^400.0 

4 s ^»Ob 

37.7.14 

10.44a: 

,-pOo*o 

4.V6U 

33. 162 

1 1 .436 

A-VCO.O 

4sVd^J 

3c* jrjv 

! ) *93.^ 

3bOGsO 

4.v6a 

36.020 

ia.430 

avcQ.o 

4s96r« 

3u.t-94 

I3sVuP 

iCOOe^O' 

4.96Q, * 

36.D62 

13.44l3 

^vlcc.p 

4.^JDd 

3v-0£b 

i3.y-c.o 

.>£odi*p 

,,A.y^.-'. 

3Vs 1B3 

lA.417 

h:* 

s oto 

0*0 



>■ 



• r 

Vi* 

7 4 s 7 

-c*C44 

. 100*0 

E.3VJ 

, ,,: 24.367 

•J s 2bb 
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T&ble 3-16 (Continued) 


(Cont'd) 


^OOeO ^ 

OetiUi 

26*520 

-*0*602 

400*0 

6* 97b 

33*247 

0*707 

OOOeO 

7*00V 

36* 0B2 

£.'* IQO 

600*0 

7*067 

36*107 

3*bl4 

lOOOeO 

7.2iy 

39.702 

4*9aa 

l4:00*0 

7*390 

41*033 

6*404 

I^OOeO 

7.600 

42.107 

7.90^ 

1600*0 

7*623 

43.217 

9*446 

4^000*0 

6*196 

^^b*004 

12* Ob 1 

22C0*0 

6.3L2 

45*793 

14*307 

«:i4C0e0 

6*606 

40.527 

lb* 990 

2600*0 

6*639 

47*213 

17.708 

4u‘VCOeO 

U*70'0 

47.640 

16* b 7b 

2600#0 

6*767 

47*657 

19.448 

i.“>OOeO 

6.MI C 

40*166 

20* 3t.:o 

3000*0 

6*6b9 

46*405 

21 *210 

3JC0#O 

i 

4o.7bb 

cV;*096 ^ 

3200*0 

8*962 

49*040 

22*992 

Mi!t> iB 

• Ott^ 

»!j7* 7979 






• 0 


36*390 

*367 

100*0 

7*961 

36*396 

-l.bbi 

r-CO.O 

7.969 

4 1 * 9 1 o 

-0*76a 

400*0 

6*166 

47*464 

0*635 

OOOeO 

6*6Vo 

bO*U9l 

2*509 

600*0 

9*24t? 

53*464 

4.300 

lUOOeO 

9.661* 

!iO*b92 

6.^0> 

1200*0 

1 0*444 

b7*441 

8.240 

l^OOeO 

10*967 

139*092 

10.3U4 

1600*0 

1 1 *462 

60.591 

12*630 

*tooo*o 

12*214 

63.234 

IV. 3 73 

2200*0 

I2*b0b 

64*412 

19*840 

ci^*00*0 

12.763 

66*61 1 

22.3 7c: 

2600*0 * 

I2*96b 

66*84 1 

24*94b 

ci700e0 

13.0U9 

67*03^ 

26*2ao 

2600*0 

13*146 

67*506 

27.bbO 

£iV00e0 

]:S*226 

67.971 

26.676 

3000*0 

13*304 

66*421 

30*201 

JlObeO 

13*374 

* 6«*Hba 

J 1 « 63 b 

3200*0 

13*441 

69*284 

32.876 

0 16 

•000 

69*669 






*0 

6*666 

32*460 

-1.606 * 

100*0^ 

■ 5*666 

32.466 

“1 *Oad 

«^00e0 

6*434 

30*340 

-0*b23 

400*0 

b* 13b 

39*991 

0*b2o 

OQOeO 

b*04y 

42*054 

1*544 

800*0 

^ 5*016 

43*50) 

2*bb0 

lOOOeO 

4 *999 

44*619 

. 3«bbc: 

1200*0 

4*990 

4b*b29 

4*bbl 

UOOeO 

4«9b4 

46.296 

b.bao 

1600*0 

4*981 

46*963 

6.844 

SCOOeO 

4.97 1 

46*074 

6 • 530 

2200*0 

4*979 

46*549 

9*532 

tf<*OOeO 

4*961 

46.982 

10*527 

2600*0 

4*986 

49*361 

1 1 *C124 

it^OOeO 

4*990 

49*569 

1 2 • 023 

260C*0 

4*994 

49.751 

I2*b22 


4*999 

49*926 

1 3«02c: 

'?C9C*C 

6*004 

, 50.096 

13*522 

:>10QeO 

6*0l0 

:>0*260 

14.023 

3200*0 ’ 

&.017 

/»H]fS0*4l9 

14*524 

OH 17 

* 

o 

o 

9*432 




■= ■ : ■ 


• 0 

7*796 

3b *720 

—2 * 1 9 c: 

. 100*0 

7*796 

35*726 

-1*467 

iiOOeO 

7 * ^£>6 

40*9ttb 

-0*711 

' 400*0 

7*087 

/ 45*974 

0* 725 

OOOeO 

7*067 

46.637 

2.137 

600*0 

7*160 

50*677 

3*556 

lOOOeO 

7*332 

;>2* *9 1 

5*003 

1200*0* 

7.549 

/ 53^847 

6*491 

1400*0 

7*766 

*3b.027 

6*023 

>600*0 

'7»V63< 

} ^ 364077 

9*596 

£0C0*O 

6*260 

57.691 

12.649 

2200*0 

6*416 

^84686 

U*5£0 

i^4G0e0 

B*b26 

:»9.424 

16.214 

2600*0 

. a*62^ 

00*110 

17*929 

tfj7C0*0 

6466b 

60.436 

16*794 

2B00*d 

6*706 

60*752 

19*662 

... e!S»00*0 

^ W*744 

6i *Qb6 

20 * 535 

3CdO*0 

6*780 

. 61*355 

21*411 

3100*0 

’ 6.BV4 

61 *644 

22*291 

32p0*0 

6*646 ‘ 

, 61*924 

23*174 

02' 32* 

000 

0*0 






*0 

6*9BB 

41*39b 

-2.07b 

loo*o 

6*956 

41»3*S 

-1*381 

i^00*0 

6*961 

46*216 

-0*66b 

400*0 

7f 1V6 

9tip9t 

0*724 

^^co*o 

7*670 

54*096 

^ 2.2 IQ 

eoo*a 

a«r063 

S6«tel 

3.786 

1000*0 

6*336 

r>6.192 

b.4^sV 

^ 12Q0*0 ^ 

8.527 

S9*TJgQ 

7* 1 14 

1400*0 

U*o74 

61 *Obb 

6.63b 

1600*0 ' 

6*600 

. 6e*2RZ 

10*862 

20CO*0 

y *029 

64*210 

14* 149 

2c:O0*0 

9* 139 

6S«07* 

15.966 

2-i*CO*0 

9*243 

66*676 

17*004 

2600-0 

9*3b4 


19*064 

2 /OO • 0 

9.40b 

66.97a 

20*002 

2800*0 

. 9.455 

, 67*3I> 

21.54b 

’ fcVCO.O 

V.b03 

6V.Ob0 

22*493 

3000*0 

9*551 

■' ' £7*.73 

23*446 

■ JiCO*0 

9*b96 

66.267 

24.403 

3200*0 

9*640 


25.368 

CL^ 3*5 

.457 

20*922 






*0 

4.969 

J3.96'.» 

- 1 * 499 

100*0 

4*969 

33*959 

-1 *002 

' cc*o 

t>*03fcS 

J7*4 12 

-0*503 

400*0 

S.370 

41*01^ 

0*540 

5. r-'- .0 

b*44b 

43*212 

1 r 62b 

800*0 

5*389 

44«77Z 

‘ 2.710 

u;oo*a 

b * 3 * 4 


3*760 

ltO0*0 

5*249 

46*9JiO 

4 • t> jij 


^308 
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Table 3 >16 (Continued) 


iHUOeO 


U /• : ei.un 

ICbUeU 


be 1 bf> 

4bs4cfa 

Lt.VJ b 

f\Q0O*O 

!>■ lOl 

^♦V*t*70 f’i 

< uCJ * 0 


T^eObl 

«n. 

Cbb 

9 , 9fa4 


ba066 

l>Oe^»yV 1 Os 



b*Ob J 

504 

•i02 

1 2 * n 1 

ir/COeO 


■^\m09L l^iblO 

,-'bOO*0 


b*043 

tr 1 1 

t7to 

t 3 * 0^0 


b*03B 

Vtl I3ebd4 

3000*0 


b#034 

^ m. ¥ 

023 

J4#0r (_ 

3lCCaO 

be03I 

?l'e7bb W*#iTbJ 

3200*0 


5*027 

51 *94b 

lb*0-4 

* 7caV0to 

0*0 








aO 

7*001 

4bs Ibo iy4 

100*0 


7*001 

4t>* IbO 

-1 *496 

tco»o 

7*b76 

bOalbfa -^Os VV^-J 

400*0 


b#437 

bb*724 

0*64b 

tiOCeO 

B#7ai 

&Ve2l2 ii;*bfa7 

eco*o 


•t3#o7tl 

61* 

747 

4,331 

IOOCrO 

b*v^t>6 

bJ*7j / ■ fa, 1 ib 

uoo*o 


y*o 10 

65 *3 7b 

7.912 

« 

I<*OOeO 

VeOb! 

fate 707 y, / Jo 

lfaU0*O 


y#obfa 

67. 

V7b 

1 1 *b3:. 

aJOOOeO 

Vi 1<*V 

70*013 lb. I7v 

ddOOeC 


V # 1 1*4 

70*'->Dt> 

17.012 


t-’*COeO 


7lefab/ lb, fab/; 

2bOO*C 


y #2ub 

72* 

427 

2C.7CI 

iiVoORO 

y*aiy3 

/d.777 2J ,t.*:y 

dbOO *0 


y • j ! 9 

7J* 

1 16 

22 ,bbO 

<;voo*o 

y. 

73.4A3 

JC0C*0 


y# *74 

73*760 

£4*429 

JlOOeO 

VeAO‘3 

i!ij,3ob 

jdU0*0 

♦ 

V • 4 3£= 

74, 

3u7 

2fa* 3 1 0 

HCL 

-^2*063 

/ 

,* - 

> 




.0 

e>*y&y 

37 #041 ^ ~2#0oo 

ioo*o 


'^faiVby 

37# 

04 1 

-1 *3/V 

tfOOaO 

6«ybl 

4 1 * “0 * fab J 

400*0 


C*y73 

46 , 

693 

0*710 

OODeO 

7a06y 

4y*b34 ‘d, 1 Id 

faUO.O 


7#2H0 

51* 

595 

3*b4o 

Cards 13 

lOUOeO 


*jbi2b0 b.030 

1 -r i»0*0 


V.rjiy 

54 e 

6s2 

6*5£.9 

, MOOaO 

(JiO‘^4 

D'j eb7b fa • i ' jb 

IbJO.O 


o* 4 Aiy 

36*961 

9.7U3 

(Coat’d) 

.=:oooaO 

bibO'v 

;>Oeb30 13# 1 JO 

d4.on « 0 


Cl • b 1 4 

59 ,646 

I4.B47 

t.**OOaO 

b* /QJ 

faOebVV Ifa.bVV 

r. faOO*C 


t.. 7 /rt 

61 , 

099 

IB.327 

c: f CO • 0 

b * b 1 <1 

fal*43l , lV*/07 

2b00*0 


b.U4 4 

t3 1 • 

752 

20V090 

JVCO.O 

d.uV^i 

fade0b3 dO*yVti 

3000*0 


t>i vUd 

02, J64 

il 1 *0u4 

>» 1 00 • 0 

^b.ydd 

fadebbb dd, 700 

.»dOO*0 


b.VbJ 

62* 

940 

33*6b0 

NJ tfiOsOr^A j 

0*0 







• 0 

6*Hb6 

ibe 170 

100*0 


fa*ybo 

3b« 

170 

-1 *379 

^-00*0 

fa# VO 7 

• yyi^ *0 • bi ^3 

400^0 


fa*yvo 

47, 

biB 

0*710 

OOf.eO 

7.1^6 

£>0 *bb:> d« 1 

b00*0 


7. bid 

be- * 

79b 

3 • I '.'fa 

1 0 00 • 3 

7*br,:i 

!j4,bD 7 b, UJy 

li-00*C 


b,Obl 

5b* 

9 3b 

6.71b 

i^OOsQ 


l>7#iild b.obO 

u»oo-o 


fci jyb 

bb V 

324 

10*015 


b*oO L 

faO • 1 J, ^4 1 o 

2£.00*0 


b*t>72 

fat* 

04b 

lb* 14L^ 

.-.'*00.0 ‘ 

u . r,j 1 

fa 1 .bOd lb* bob 

^600*0 


to. 7 7V 

fad *b03 

lb*fa3b 

/OOaO 

faebOO 

6^ #b j*_ 1 b 1 7 

£ib00*0 


to* fa/^0 

63* 


20 * jy b 

€1'JQO*0 

U * bbb 

fab# 40 '3 d 1 • iV ^>0 

3000* 0 


b.bbLi 

fa3 * 

766 

£.£*.• i OO 


-iieo.o 

'mi 

1-0 *^..0 

bicj/‘. 

fa4#0b:j dJ*C\il 

JdOU*0 


b.Ubfa 

64 « 3 J7 

£- 3 * 9 3 S' 


] *U 1 

«J b-0 1#0 1.0 1.0 

1.0 1 

.0 

1.0 leO 




>ards 14 < 

.Mi? 

1*0 3.0 

L ^*0 

20*0 1 

*0 10*0 t tO I *0 1*0 

1 eO 1 

*0 

WJ 1*0 





1 *0 . 1 

*0 10*0 1*0 1*0 20*0 

t #0 1 

■ 0 

1*0 1*0 





V) +oii 

+Ml 

*H2CJ 



fail 0*~2C 2*0 


0*0 


C -*-H 

+ Ml 

=OH +W1 


21 

2.bO«J2 0 

*0 


0*0 


0 fo 

+MJ 

=02 +Mt 


24 

J.tjU-jO 1 

*0 

-340*0 


H +M 

+M2. 



22 

2.ii0-30 1 

• o 


0,0 


CO +0 


= C02 +.MJ 


23 

i;*00”33 0 

•o 

-4000*0 


H . 

+M1 

= MCb +Ml 


£>2 

1 . lO-.Jl 1 *0 


0*0 

iards 15 4 

OH +H 


:=H2 +0 


14 

1 .40-14-1 

*0 

-7000*0 

6m +o 


= M +C2 


1 1 

4*fjO-l 1 0*0 


0*0 


UH '•H2 


*-H20 +H 


J4 

] •00- 17-2 

• 0 

-2900*0 


0^-1 ' *■'-0 


= +H 


14 

1 * 1 0-19-2 

• 0 

1600*0 


OH ■*-0m 


= M20 -to 


: 3 

1 .00- J 1 0*0 

-1100*0 


OH -*HCL 


=H20 +CL 


1 

J #00-14^1 

*0 

-1000*0 


-^MCO 


=oii +CU 


1 3 

3*00-12 0 

■ 0 

-4b00*0 


-^>,^-309 

/ 
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Table 3>16 (Concluded) 


Cards IS fn 
(Cont'd) let 
Cards 16^ 
Card 17 ^ : 
Card 20 

Slfiil 

Card 24 
Card 2S • 

Card 2o ^ 

Card 27 

Card 30 


+ CUa: 

- .J00n7 

» «/> / 


i0097i> 

* 


=HCL» +CL 
= MCL +H 

*0^760 
, *00001 


I-* iJsCtJ'lO 
I J t>*00-l 1 


s I ^4ybt: 


• I bVOo 
eOVf. 14 


CtJ'lO 0i 
00-11 Oi 
•0003^ ‘ 


-^400«0 

-bSbOeO 

►00b70 


.40^00 
1 eC 

' 10.0 


0*0 
• 00*i 
0 0 


Ot.e 

0*J7b 


I 

4 1 70.0 


UF bTATE 


Cards. dSb' 


Card< 


■ 1 £. Ob /4 7+00 

• c: 4 1 

• -Jbc’Oe^.Vi-^OO 

• (-OJ«J' 3 l +00 

• /*:' 4 o 47 y+CQ 

• u 4 4 Vc.i^.0 + 00 

• >Ob-ivbv+00 
. i 0bo07l+0l 

• I ^JOb/4Cf0l 

« I 4^: 74 j2 I +01 

• 1 ^^4o09::+0l 
. J bbb/70 i-Ol 

• i Vov 44 *^ + 0 l 
. 1 1 0 I 1 7-* 0 1 
a J ‘’J30 704 + 01 

• i~OXj I ibb + G 1 

. £. I Vg; I 4.J + 0 1 
. i /^ C 1 


ll|i?eb iOiilml 

* 4 74b ?b 3-^00 
+00 *474o3b3+00 

+00 ‘*-’740203+00 
-^00 ***740203 + 00 

+00 *4740203+00 

+00 *474u2o3+00 

+CQ *474.j^OO+00 
+ 00 ***7/*o2O3+00 

+00 - 474 0 2 O3+*00 

+0l ***74 o2o3+00 

+01 *4740 2 03+00 
+01 *474o2o3+C0 

+01 -474o2o3+0O 

1-0 1 * 4 2 o 3 +00 

+ 01 * -4"f4o2O3 + 00 
-♦01 *474«2 o3 + C0 

+ 01 *'*74^)2^3 + 00 

+G1 *^74b233+00 

-*-01 *^* T'*!.i2f;>3+C0 

^C1 *47402^3+00 

• 1 4 +0 0 • 

• bc;bb 71 -*hU 3 
e^Jff:&l‘^7l++C}ti • 

• tf V i *t + 'J O « 
.b2bti7l4+0ti , . 
.;4*;;bb7i4+0d ’ « 

.b.1?6b7l4+0a * 

• brtb;37l4 + 0U • 
*L'^bb7l4 + 0d , 

• l4+0d • 

• bc;ob 7 l 4 +oa • 
*bii6b7i4+oa • 

« bf-Jub? 1 4 + 0 d • 

• '~>rlO )7 1 4 + 0 • 

• i 4 + 0 il * 

• ** + Jb * 
.72*037 I 4 + 0 ti * 


0*33VL» 

I i,llOOO'‘>b+Ol 
•‘1 I OOCbo+0 I 
• iioooyb+0 1 

• 1 loOO't'b+o 1 
■ • 1 lOOO't^b+O 1 

• 1 lOOObo+o 1 

• 1 1 000‘:^tj+o 1 

• I lOOOVb+0 1 

• J 1 0007tJ+o I 

• 1 1000^-«« + 0 I 

•llOCDVo+ol 

• I 10CO''--+0 I 

• 1 loao'-bto I 

• 1 lOOO^^fi + O 1 

• 1 lGCO**ti+o I 

• 1 lOOO'-^t-i+O I 
« I 1 0007b+o 1 

• 1 1 OQ07ti+c ; 

• ! 1 OOOVui+G 1 

• l]0007u + f:l 

102‘bjovj“0a e 
1 • 
1 C2tloO-j--Oi= • 
1 02b-)bb~0/i ■ 

102bdob-02 • 

1 02Bbbb-0^f • 
l02b3Ob-0i; * 

l02b-^0b-C2 - 

to2bJcib-0ii • 

to^bjob-o*:: • 

lC2bbbb“Ci m 

1 020 jO)**0i. • 

1 02b )bj*-Ot: • 

1 02o->o*.^-»02 m 
1 4 • 

lC2b:ibb“C*-' 


C>*c;07b g 
1 1 •c244bOl-0o 

I I •biolBbo+oO 

1 *6322t0y+00 

1 .^-/4bJ7t;^+00 

1 , .I2to4b0*^+Ql 
1 * I ‘.-clOOti7+ol 

1 • ^02+01 

1 .i„2lJtiVo+0l 
\ *f'b2'^00-'+0l 

I et- l'^^JiLb+O I 
I * *ilulib4+C t 
I *j4/7vj7v + 0I 

I •bVVj.bO*'**. ^ t 

1 *41qv0jG+01 

I + 0 1 

I •** O'* J -rCO+O 1 
1 •'i4.j3CiOOb *-0 1 

\ •t>:r/+ i J 1 +0 1 

1 * bCjVO<- -»b +0 l 

1 • o00C>.)<J«:_+0 i 

• 1 V + 00 ’'*. 

• 7 oJb 4 l 7 + 0 U “♦- 

• i^o 3 b 4 lv+ •) 

• /t;i04 17+00 
•7bJb4l>+00 -• 

• 7t3^tl4 17+00 -* 
. 76304 Ib+OO -* 
.763U4 17+00 ^* 
.7b3M4IV+00 

• 7boti4 17+00 -• 

• 7t)3b4 17400 
p/ojb4lV+(J0 ^*1 

• 7(j3b4i7+00 -ei 

• 7c^tj4i7+00 

m /c*jl)4 17 + 00 — • 

• /0.)b+ 1 7 + 00 ■“ • 

• TodUi '* I V+< G — • 


i *J0bbJCJ7+b4 *ie>lbl37+0£ 
) *J0o63d9+04 *lblt»137+o£ 

) •J0'-63bV+04 •l£>lbI37+0H 

) *J0bb.ja9+04 #1613137+02 

•3Cb6ob9+04 *l61bl37+02 

*jCbCjU7+04 *lblbl3740a 
#30bb-wJ9+04 • lblbl37+02 

• 30bOJ77+04 • loll) 1 37+02 

# J0663 J9+04 » 1 6 lb I 37+02 

• -iOb6j"J9 + 04 #11^1^137+02 

■ 30b6jU7 + 04 * Ini ^137 + 0 2 

•3Cbb3rtV+C4 #lblb| 37+02 

■ *'0o63;jy+04 , Iolbl37+02 

. .^+04 # lb lb 137+02 

#30b63o7+04 *loJbl37+02 

*^0uc7b7+C4 ^ lb Ibl 37+02 

• 306b3t?7 + 04 *lbl313/+02 

• j0bb*id9+0^ *l61bl37+cj2 

• 30ob-io9+04 • Iblb I jV + Ot: 

• 30bboti9+G4 « 101^13*7-04 

i+o 1 

*i4utoLj/j l+Ol 
i^34„Oo46+01 
«:lbb07 1+0 I 
1707297+01 
Id23b22+0i 
1657747+01 
1491973+01 
1326198+01 
1 lO04d3+01 
9946484+00 
b2bb737+00 
O6309V0+00 
av73243+00 
33lb49b+00 
1 Ob? 748+00 
1 I77038-06 
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Table 3-17 

EXAMPLE PROBLEM 6 PERTINENT SOLUTION 


Tvo PHASE CHECK CASE USING NON-EQUILIbRIUH PROGRAM 


DATE IOON7S 


PA«E 


SUPLRSONIC PlOR ANALYSIS USING THE LOCKNCEO*NUNTSVI|.LE NULTIPlE SHOCr COMPUTER PRoORAM 

SAS- P A RTI CLe P L OR OOtUTlO M 


CASE NO. 


PA6E 


I PART(ClEI tOHICRONI— SRK N022LE (RC/RT«2i « NON-EQUIlIBnIUN CHEMISTRY 


iconrrr 


3 

IC0NI9I 


icoNm 

2 


TCOKtST- 


20 


RUN control parameters 
— rcoMV*» 1 

IS 1 


-TCOwtBr 

0 


•rCONlTI tCONtOI- 


icoNuei 


icoNitn 


1C0N{|2> 


IC0NI13I 


ICONIM) 


C 5 C 1 1 0 " 

FLO» CALCUtATlONS^RE IR-eMGHSH--W»l- T5 PIT H THE R «K c OOftOI -NATeS-Ht-P^eT— 


ICONI ISI 


{CONllAl 


-tT Ol O 


THE FLO«- FIELO- DATA AILL NOT -WRI 9 TEN- 0 N— TAPE^- 


0>> 

I 

u> 



• ?ncct* 

• 5 rfrftfr 

oC^TfCC 


• 57Aj3-r;3 
•^Bj25-rt3 





••2^-193-ni 

-^25c^-r*fri 


^•2272? -Cl 


••|93|r-ri 

■ • I Bp 


ifrcro 


— • t 


•• l62*iS*ni 

-•8Cjt33-**2 
""■* t 25c-*nt *■ 


^ w- 

• 567794 *Qo 



• 55*9i|*cei 

•S3I31«00 

• 5 l ^*»3 *pg 


• 148354^01 


•BCl?5*C0 
“*'3i:0?0 


•|7cS3*0t 

•17697«0I 
M I S o 57 *c I 


• 9<lj96fQi 

■ BB?294^0t 


-r|B9W+c 


•43770^0l 

r763?3^oi 

» i t y ?8 A *02- 


•22751^01 
"wuootja — 


o| I 2 | 4«02 
^^200C♦02 
»12447«02 


TYPE 

— P- 


ITR3NS 

0 — 


■ iO p C B OOOWDA B f 


— .fsCDCrr 


B 

■ pco o g- 


^ c 

vcctrcr- 


D 

mCCTOO- 


hax 

-yIOOOO^O^ 










X:.> 


ttift j'n'ha 




LOCKHEED -HUNTSVILLE RESEARCH & ENGINEERING CENTEr< 




Table 3-17 (Continued) 


T»o Phase check case using NON-couiLteRiuH prograh 


SPECIE ThERHOOTNAHIC ANO REACTION DATA 

Rt-.NS.WR .NNTlCTAPt.KGUP-.tOtDOw SC f* TS 3 “ 


RlIPRODUCIBILITY of the 
6S I0MA L PAGE IS POOP ^ 

QAtE 100S7S 


PRANOTL NUKPER' 

base viscosity 


-»7CDCCrer»in!- 

• I 86 SU 9 B -05 



. 1*W0 h2 * 3.00 h20 • 1.00 0 


l.QD 02 . t.oo CL . I.oe CL2 . I.ro HCL t 1.00 N2 


■ l.SO CO . 3.30 C02 • 1 .00 H » l.t>0 H2 .IQ.OO h20 . 1.00 0 


• t*00 OH 


. 1.00 OH 


•2S33S«00 .|Ot3o-ol .27400*01 .285SN«oO .iStoA^Oo . 32000*02 .57009-02 *70000*0^ *t7S00*02 >10000*05 


C HahOER - r RESSORE-t ATNt-*- 


< 6 S -PWCSERf-W-TH 6 - 0 A S -PAR T|CLE RMTUR 


UPPER boundary loner boundary 

ftm Ttoeoo-»c3 — )T» - --iirccc>p3 — thetip* — --crc" R> .noofic *»• tsocooNoR — T heta* ->toooo*o2 


t pss»«ctrA 

V in>i 


f»siE=o=r»t fdMWMTT?,* 


^stisaaci'j 












LOCKHEED -HUNTSVILLE RESEARCH & ENGINEERING CENTER 





Table 3-17 (Continued) 


TdO PHAiiE CHECK CA$C USING NON«EQUILIbR|UH PROGRaH 


DATE toORTS 


Pace 


SP£C1€~ 

I 


Natriws— — 

•ICfiCO^C? 


PARTICLE. PHTSTCAL DATA 
M i r ss -oeN sr Tr c wtss ivi T t ac cw » coep p » 


«2saoo«os 


• CQ?OI* 


•00000 


THE particles constitute PERCENT BY NEICHT FLOtt OF THE 6AS*PARTtCLE HIXTURE 

- T he - m PI V t OUAL PE R C tH T A Be S AR F l» 0 O 


THE PAhTtC.F TehPEHATUHE-EnTHALPT TABLE *ILL BE REAo IN <»|Th ENGLISH 


Units 


w 

I 

Ui 

1 -^ 

LO 






^ ' .. ^ 


L :21 - 

V - : 
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Table 3-17 (Continued) 


T«0 CHECK CASE USING NON-EaUILISdUH PROGRAH MVt t«ON7S M«E A 


'I' t-<r SUPERSONIC FLOH ANALYSIS USING THE ’ tOCKHE£0>MUMTSVlLLE MULTIPLE SHOCK COMPUTER PROGRAM 

P A RTI CL E F LOW SOLU TI O W ^ = 

CASE NO. ' I Page 2 , 


i PARTIClEI lOMlCRONl— SRH NOZ2 lEIRC/rT«2| ■ NON-ErUIlIBHIUH chemistry 


particle temperature-enthalpy table 


o> 

I 

u> 


PHASE change data ••• ThELT* •NITOOS+ON HSOLIO* 
CPHECTi 


• 27RS1'I«-08 HLlOUlO* •103101*00 
TORO 71 ♦OO~CP5OLl0S 


v\ 




a^i»aic£a| 
trVTpfS*!* ■ ■ujumjlJ 


pawp a issaw 

fcjHuii i R j *«aeom» ^ 






if'" 
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Table 3-17 (Continued) 


T «0 phase check C«SE using HON-EQUlLleKlUH PROGRaH 


date IOOA 75 


SUPERSONIC FLOP ANALYSIS USING THE .LOCKHCCO-HUNTSVILLE MUlTIPlE SHOcK COHPUTCR PROGRAH 


CASE NO. 


I PARTICLEi ISniCRONi— SRH N0 £Zi.£|Rc/RTb 2| , NON.EQUlLieR|UH chehistrv 

PARTICLE DRAG TABLE 


RE 

Tociroo — — 
.ISSOOA’OI 
•lESSD^Ol 
•lESOO^OI 
•T2ASn*0T ' 

• 1SS2C4-0I 
n99Sfl*on“ 
.2SI00«01 

• 39S-30«’at 
»SO TCOA^t — 
•Aaico^-oi 
SrT95ec»ffJ — 

• ICCC0-»02 

• I 26Cl'*OZ~ 
■ IS82 !)<i-02 

iT9^SB*07“ 
>2S130«02 
r3i«cc*az'~ 
•39BOOA02 
■ .seta o »o 2 — 

•A3i00*02 
•79Sqd«02 — 

• toeoo-»o3 
•3 TGoo*03~~ 
*I0C30<»09 
•IPU10*0M ~ 

• leoeo'AO* 


DRAG COEP 


lOOOO^DS 

IUU9U-F9I 

lOOIO^fll 

I0020*nr- 

tOA3C««l 

infic*ar* 

I2290-A0I 

l3l5UAnl'‘ 

I9l20«.nl 

tsi70*or- 

IA2SO*01 

ITRSO+Ot” 

IBTRDA’OI 

2C2A0*9r ' 

ElBAOA'fll 

736SO»OT" 

2S5SQ*Ol 

27G30*ffl~ 

3cooa«oi 

32320*01 ' 
32S20*01 
3»ZSO*Ol~ 
91550*01 
79000*111“ 
20000*02 
2oD2u*ai" 
20000*09 
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Table 3-17 (Continued) 


T>0 CHECK CASE USING NON.EQUILIBRIUH PROGRah 


date |oOA 7S « 


SUPERSONIC PLOW analysis USING ThE LOCKHEEO-HUNTSVILLE MULTIPLE SHOCK COMPUTE* PROGRAM . 

GAS-PARTTCCE“TCTir-50C0T10N — 

CASE NO. I H 


I PaRTxclEI ICN|C*ONI— :>R»t NOZZtE l*'C/KTa2t . NONoEQUI (. I BK |UH CHEMISTRY 


THE mcsh construction kill be controleo by the folloring variables 
OL interior* .70fl*3t o)r inrss r^oo^oo-DtrciHv. — isog^oo dl o^lete* — s-200-0Z'ijeg ’P»h*a •noo^oi t. ->sts*oo 


OJ 

I 

UO 


\ 


P"'- '.'ip 


jrSSiisrs* 

5K=""‘ i Sfc 35nrr.lii 




tjCftTTi’s:* 










m. . 


'M 


ESS C5? 
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iTM mm JSSS3 ra cn a=n uzz cr: cm cm cm cm 


RESPEODUCIBILny OF THE 
0RIG3NAL PAOF IS POOR 

Table 3-17 {Coatinued) 


T«o Phase check case using non-ehui librium program date iaOS7 S pace f 

SUPCRSOHIC FLOW analysis USING THE LOcKHEED-HUNTSVILLE MULTIPLE ShRcK COMPUTER PROGRAM 

- solU T I OW 

CASE NO. *1 page S 


I PARTIClECIOHICRONI— SRH N0ZZlE(RC/RTb21 . non-equilibrium chemistry 


LINE POINT DSCRIP - REGIME 
particll uata 

SPECIE POINT -OESCRrPTTOir 


- R 

HACH^-AITGL- 


TheTa 



ENTROPY VELOCITT M-TOTaL 

-GaS-C O N STi L-Oc* t - G AM H A -SHOCK aMGLE- 


ITR 


-YCHFERaTURE 


1 • TtrPUY C ON t in i- t ia aec » *l 7 «t a3 i 3C ■Y10ai»D« rgg WHA-O a vOMOO ■ RS9 75 *oR ■ J0 0a 3 * 0 B — ^ — » 

^.&53A9«U2 •23736*n3 •2<tGY3-0Z .S5i9S-»oG .ZScTB^OY »I2A|8*ol 

particle data- 

> > .3SI177-»CH .OSDOO .2B980«00 .BZASTt-OS *1028*1-02 «BAIA&*DS 

CHEWrCAL SPiECie MOL-C-T«ArTIOMS 

CO 2.5j35-ei cor I»893'»-0Z H 2»76ca-02 H2 Z.RSSR-OI M20 I*590*“0l 0 -,^»3000-0*l OH S*TooO"03 

Trt T4 oui! 0"0» ct: r r r saB» B 3 cct rg rogiy c s h t l— — i.Rtsz-u i irz Y . o i Y e»o2 — 


I 2 INPUT - CONTIN .|2067«C0 *11001*61 *3lA|3*00 *00000 **IS975*oR *20^83*08 0 

W . .. g«Wfr»*02 ¥«TJW*n3 ^r2S078*1H rt 2818*01 

.j particll data 

« 2 ‘‘ ^Sb l 177 90 1 -.Ui»7/» C0' .2i>ve0*UC *S2 AS 7*C 8 - A - t llEOI^eE g5gt 8G * 0 l 

CHEMICAL SPECIE MOLE FRACTIONS 

CO • 2*5335-61 C02 1 *893*?-02- K trZ 2T8SSW-01 H20 W5Y08-al 0 •3'»3O00"0l OH — S*7000*03 

02 7*00C0-0S CL 7.7503-03 CL2 I•0e00*’35 hCL 1*9952-01 N2 9*0|l0-02 


1 a — — • coi*TtN 

*g1l3S*OD 

•85389*02 

— .87183*60 

• 237361*03 

-IIDBJ »el *43226*00 -000*8 

• 2«t^93«n2 •5 Bi9S^qH •2&Q78«o9 

.16076*01 

•12810*01 

»gQ9fta*o§ 0- 

1 3 ”5^ 

»35I|774p09 

-.33155*00 .25980*00 *52857*08 


*10281-02 

*58188*01 

tntTY|t*ir af'Ci V rfL IfOtc PTITC TTTTW5 

CO 2*5335-01 C02 l*B93n 

-02 H 

2.78oO'C2 

H2 2*8551-01 H20 1*5908-01 

0 

3*3000-01 

OH S*7ooo-o3 

W* '*UUUU^*J3 VU Te/ayr' 

»xr3 CL2 


"Trrtr“"'“TTT9S3=ut~‘"“nT2''‘~‘"““'‘"”9TnT*hj*iy^‘~“ 




1 9 INPUT •• CONTIN 

•38202*00 

*17183*00 

• t lOCI^^Dl «99838 ^qo «0D000 


•15976*01 

•20*83*0i 0 

PARTICLE DATA 

.1*5389-02 

^ ‘ • 23736^03 


^ rt 2818 *01 — 


T 1 

CHEMICAL SPECIE HOLE FRACTIONS 

• 3^ 4 1 7 > 



">■1 0281-02 

*58188*01 ^ 

0? 7*ODC0-ft5 Ct 9.750'» 

— tT2 H 

-03 CtZ 

1 •ocoa-c& 

n« ui nzD r— 3TUO-01 

HCL t*l9S2*m N2 9*0ll0-02 

0 

3 ^3oOQ— 09 

S»70ao*83 









NOTES: (1) Typical printout for the startline data surface. 

(2) Some points have been omitted for demonstration purposes. 
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Table 3-17 (Continued) 


T«0 AhASC check case using NON>eOUILiBRlUN PROGRAH date 1O047S PACE 21 


SUPERSONIC FLO* anactsis USING The lockhced*huntsville multiple Shock computer program 

GAS-PA RTIC LE- PLO W S O CU T f O M 

CASE NO. t Page it 


I PARTICLE! I0H|CR0NI«*SRM NOZ2le(RC/RT«2) » NON-eqU|LIBR|UH CHEMISTRY 


LINE POINT OSCHIP - RECINE R X M . THETa ENTROPt VELOCITY M-tOtaL It* 

HACMTinGtE PRe^SUrte DENSITY T EM PER a TURe GjS *eONST* LOcaL~GaTTMr— SHOcK a**GL.E 

Particle o*ta 

SPECIE POINT -oeSCRtPTlew — — V theta O-N EW THAL P T oeitstst temperature-' 

r* t - -W Att ~ COMTI N * 8C g ee ■T GA 5 »»3D » lBR T 2 » b l ^ rOOOOS ■3 5 Sb T * 02 ■R 5 e e **0R » 2 oRR 3 »BO •- 

.AS7d3-*02 «23215'»03 •2RI91-02 •55|VI«OT •2S039«’OS •I2A|3«01 

PARTlCtt data 

I I .377ll7*0R *3nC0e .I93BU00 •S2<|R2^08 «9AS07-03 •SSSSr^QR 

CMEHICAL SPECIE MOLE PfrACTlONS . • — 

CO 2*S3‘»7-0I C02 l*T2vf-C2 H 2»5783-32 h2 2»«A55-0I H20 1«5T7i»-oI 0 ,^t7828-0T OH 5«OA53*03 

“02 8*2N10"0* Cc T « 2 3 1 7 o gS ' C c ?’ « 'l a23 "3 S rCE r *§ D 7 T * 0 I N2 » > nr2 Bs^q i 


^12 2 INTER - CONTIN .ITZIH^OO •7S62A-»ga •lcT7|4>bl •28 iHA«00 •3SR8|«o 2 .RSeoR*oV •20N83'*0* S 

»- -- ^ rtS-PtmC2 r 2 S2 l 7-»ftS r2RHfO-c4 rSSrP-E^R — »2SO30'*’OR ■»-l26-l3*OI — 

“particle data 

1 2 a ar7t- 2 E*OM *.30 C 02» el y TT» a« y<ie »s 2NR 3 «0R y 5 S V 3 R*CR 

CHEMICAL SPECIE HOLE FRACTIONS 

CO - 2»53*»7*»| e02 l*02N»-rr2 H E.&- 7 0A— S2" — -H2 *t»*SS-IH mEO |-»G» 7 R*et 0 Olt 5«0A4I»03 

02 6.2<«za-eS Cl 9«232A-b3 Cl 2 |•t62 S-JS hCL I•5c2’-0I N2 T«0203*02 


L2 3 Ht W R — ■ G OM TI N » 2 r» 2» *C0 . 7 8 63 4* 00 .l b»7 8*b l .BA j A TaQ O .366 2 8*8 2 .RBB OtAfl G . g OReG A Ot s S 

•46729*82 •23221*03 •26104-02 •S5|93*06 •25039*0R •124|3*0I 

■PARTICLE -DATA 

I 3 .377CS7*06 -•«b36l-01 .I93T0*00 *52663*06 •tASU*OS •SS03S*00 

CHEMICAL SPECTr-HO L E P RAC T IONS ^ 

CO 2>6367*Q| C02 1*9266-02 H 2*6789-92 h 2 2*8455-01 H20 1 *6978-01 o 2*7666-06 OH 5*0470*03 

o2 4*if«i67-o5 Cl ' 9*2JJA-oi CLi ' i*l4*7-o5 HCL |5'S028*UI ' NZ . ' 9*02*2m 02 ' ' ■ m ■ i. 


|2 6 INTER - CONTIN .34439*00 

,t9 7 a o»oo 

Particle data 

1 6 , 37 4767^06 

CK£H|CAL SfEClE HOLE FRACTIONS 

02 4.2760-96 Cl 9.2357-03 CL2 


*76384*00 *19949*01 *66A|7*0o .35322*02 .66794*06 *20404900 S 

i 2 3 2 2 7* Y3 ‘ * 262 9 2 -0 2 T 9r97»5*06 - 4 2 S0 3 9» 0 4 H 24l3 » 0 t j 

■ v rtT S N-e* " ■ ■ * 1 770 3 *0 0 * 5 2 665*08 -- r tA Sai ^e B ■> 65904*06 i 


»r579S-9t M2 2*4464-09 M2e 

I* 1639-35 hCL 1.5028-01 N2 


1 *59 73 -0 1 0 : — 2*7059-04 OM »*»40 2 * » 

9*0282-02 


NOTES: (1) Typical printout for a data surface inside the nozzle. 

(2) Some points have been omitted for demonstration purposes. 
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Table 3-17 (Continued) 


T«o Phase check case usiNa non-equieibRium prosrah 


date IOOf7S 


PAGE 


as 


SUPt-RSOHIC FEOA aHALTSiS UStHG THE LOCKHCED-mUNTSVILLE HULT|PLE SHOCK CONPUTeR PROGRAM 
GA S ip A BTI CLE FL OO 5 0 L 0 T 4 0 H 


CASE NO. 


t 


page at 


I PART|CLE(10HtCR0NI->SBH NOZZEE ( RC/RTb 2) • NON.^OOlElBRlUH ChEH'STRT 


iNb Point oscHtP > beqime r 

-NAtH-A,N6»HE- 

PaKTICEE JaTa 

SPECIE POINT - oESCKlPTiON- — : V 


THETA 


entropy velocity H'TOTaL 

L-GANMA ShOCK-AMgLE 


ITR 


■T-LaLT m M 

f Hot T ft " 


-0-H- 


g~AlTi->A.l. QM 


-OENStTT- 


-^NPERATVRE- 


-JLH_ 


-U!i LHIEA T^-rONT-IJL 


tSt>g.L4aT, 


,lEA03t02- 


,Z79V7a01 


>40*100*07 


OUWOO- 


■siasAtoo 


ia | . 70 A * 0 » - 


.20927*02 

Particle oaTa - — 

0 f'AKTlCLti are present aT TH|S PnlNT 

•H»K|CaL SP..C1E hole fractions ~ 

2<H:sAN-0t t02 2.91BA-02 ' H 

K2 1 . af .a sfr o ? CL ^lo- 


•.IR|12*02 


.2HN75-03 


*33762*0R 


•29b79*0R 


•12793*01 


2.039a>03 h 2 a^OAlN-Oi H20 |.S8Sa«01 0 

■ i ■^ la a9- p7 hog i . 6 T0 7 - oi n« 9» i -9 7 6-8 a 


a*li3S-07 OH I.ISAQ'OR 


Oi 

(!ij li 


|7 \UJlH * COHTIU O&fl3&a«0t 

- -- 


|126S2^Q2 


•276ts^0l 


•I0B73«02 


rOOQOQ 


TlCLL OATA 
>u-tAHT.lCXLa-AttE,p.RE5EN7 


• 9|]9N5*09 >2|ABA*08 9 

•01 - 


aT . T H IB PoIt i T - 


.•upical specie hole fractions 

.0 2.H«UO>OT C02 2*Sl{]2S«02 H-- 

U t.ay/s>u7 CL I.137&*U3 CL2 


•B-83 h 2 a- K> 5 » G«t H H»0 I .S WOi - 


1.2263-07 nCL |.6I39*01 N2 9, 1978-02 


8« 2<0l - 0? OH 1* IOao«09— 


H 10 aall - enwTiN .AnAab^in ,i>A*Y*n6 >27670*04 ■ .-1 1191*02 .00000 »906U»QA ■2|S9S*02.. .4 

.21186*02 •49980*02 ' •2S6Po-03 *39469*09 •29S78*QH •1270S*0| 

Particle data 

lO Particles are present aT this point 

hchtcae specie hole-fractions — 

:u 2<.9890-01 C02 2.8927-U2' H 2*7838-03 h2 3*oS9i>Q| h20 1*S68S-01 0 8*1389-07 OH |*|BV8-09 

2 1 .8 79 3 * 0 7 Cl 4 ..4 a 3 * -04 CL3 1 . 29 9 0 - 0/ HCL 1 .649 1 -8 1 NO 9 * 1979 - 02 


, 19 19 PRN-hR - COHYIN .6o6SS*0t .12667*02 *289S2*01 .19618*02 .00000 *9 z668*q 9 *2tS95*08 9 

. .. .20210*02 , 1 i a 77* 0a *2 1 397*0 3 .32 52 0*0 9 — .^*408*09 *1084- 7* 04 

Particle data 

lU- P-AKlltUS -AKL present. At. THIS POINT ; 

HCHICAL specie hole fractions 

0 a.SoYOSrol—COZ 2.8922*02 H 2*2638*03 h 2 l.oSTfOl h20 1 *.5885 * 04 0 8*4.38 9* 02 OM ' 

2 1*8793-0/ CL 1*1229-03 CL2 1.2990-07 hCL l*6i9|-04 N2 9*1979-02 


NOTES; (1) Typical printout for a data surface containing a Prandtl-Meyer Expansion. 
(2) Some points have been omitted for demonstration purposes. 
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Table 3-1? (Concluded) 


InO PHASe CHACK case USINC NON.E«UtUBR|UM prograh 


date 10047S 




suPe**S0Mic flcw analysis usinq The lockheed-huntsville multiple Shock eohputep program 

-GAS-PAKT4CLE F ^O R SOLUT^WH 

CASE NO. 1 

I PARTiCLC( rONlCRON}«>SRM N0 ZZLE<RC/RTb 2) • NQN-EOUlLIBRlUH ChEmiSTRT 


PASS 


.tilt. PuInT aSCRfP • REGIME R 

— JiACU-A* 

particle OATA 

SPECIE PutNJ— QCSCIUPTAOM 4 


Theta 


aEMS4T-»- 


ENTROPV velocity H-ToTaU itr 

> 5 C ONST . COCAI &A»UU SHOCK -aHGLE- 

Tcm»£RAT«R£ 


.Z2670-»Q2 .66679«'0| <1|HS4-0S .3H|07-»0<|- .2>|A22«0R >l279I-»0t 

article, data ^ : — 

I I >77<(sG9*OH *00000 •23i29«oo •392S9*oa *A2302*09 •Rl700'*’0R 

EH|CAC~SPECtC-~HOL£-Kf|ACTI0MS 

2.R797*al C02 2.937a-02 H S, 2823-03 h 2 S.oSiS.Oi H20 t»S793_ol 0 2.B732-QA OH 2,1999.09 


20 FRCCrD - CONTIN *&25SB4>01 .13077*>02 *332O7«0l .29S02A02 .8|533^00 •983SA«'09 *2|S8a<*08 6 


article data 

. PAA3JXCL 9 -a r e . RM t SC M T aT *H R 6 POI N T 

LRICAL I>PtClE hole PRACTIONS 

2.9(179-01 ...L02 2^9o32«02 H 

1*8|90-07 CL I.I9S2-03 CL2 


-- 2AT725»a3 m2— 

7.0311-09 mCL 


1.6139.01 r«2 


I.S B a i .^OC- 

9*1980-02 


-S.SiTSsoS- 


.22668*02 *66S57*01 *11919-03 .SRIOSaOR *29622a09 «1279|*o| 

article. DATA 

i I .779920*09 ,00000 »23o29*o0 ,392 j7*0S «A2029-09 •91700»0S 

IH^CaL 3(Pc.CIE>M0LC-KRaCT4«A5 

2*9796-01 C02 2*9391-02 H S.2800-03 h2 3*0S|7-01 H2o I.S792-01 0 2*8699-04 OH 2fl9S0-09 

A*au»— »2 Ct 2. I20 S- 03 C L 2 1 . 1070 - 07 MCt 1 , 601 2 - 01 M2 9 , 181 9- 02 — ■ ' ' ■■■■- . 

18 20 PREEBO • CONTIH .42705*01 *13U0'»U2 *33219*01 *29995602 *92792600 *98349609 *21588608 4 

- - -- *1-7S2«^2 ,85 27 0* 0 1 » lfY - 2 8* 03 * 27 ^ 12 609 *^95 7 8609 « 129g9 *o l 

article OATa 

-Paw TI CLLS are P H 5 5 £ M T a - T - T HI S P Ol N T — 

EHICaL SPECIE hole fRAcTtONS 

2*A»7**Ol CeO 2-8099-02 M 2- 77 69- 03 ifg 5 *0* 03 - 01 H20 l » S 86 o - OI ~0 ^ 3 *-S | 49-o 7 OH 9tl09f»H 

1«9«73-07 cl 1*1950-03 CL2 4.9973-09 hCL ' I,*l39-0| M2 9*1980-02 


9*1980-02 


NOTES: (1) Typical printout for a data surface in the exhaust plume. 

(2) Some points have been omitted for demonstration purposes. 


r?' ^ l 

j* 


a-:-;.-'. 9 


tt-T’-.'-’i 






Example Problem 7 


Example problem 7 Is the same as example problem 6 except that the 
start line is calculated internal to the program. Table 3->18 presents a flow 
chart of the input data for the specified problem. Note that Card 35 replaces 
Cards 33b and 34b of example problem 6. A listing of the pertinent solution 
is omitted as it is basicall/ the same as for example problem 6. 
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Table 3-18 

REQUIRED INPUT FORMAT FOR EXAMPLE PROBLEM 7 



* 


If species mole fractions are input on tape (ICTAPE^l) cards 16 and 17 are not required. 
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Example Problem 8 


This problem analyzes a two-phase ideal gas flow field with the follow- 
ing stipulations: 

1. Free molecular flow calculations are not to be considered. 

2. The gas properties are to be read from cards, and 

3. The start line is to be calculated internal to the program. 

Table 3-19 presents first a flow chart and then a listing of the required 
input data for the specified problem. Table 3-20 presents a listing of the 
pertinent solution. 
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Table 3-19 

REQQIR ED INPUT FORMAT FOR EXAMPLE PROBLEM 8 



If gas properties are input on tape (ICON(l)=2) Cards 9, 10 and 11 are not 
required. 
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B 

0 

0 


0 

0 


0 

D 


D 
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Table 3-19 (Concluded) 


Carda 

1«3 

Card 4 


Cards (> < 


^TWO PHASE IDEAL GAS CHECK CASE 

I O 2b40051 1 6 1. 

l«E7B07lAo2»4bl702S tb«366 
I • 40 1 649S tt 2 • Ab9V 1 60B 1 ti • 

1 • Sb 1 3463 ;> 2 • S 4 > 4608320 • 

U6V91b3 2.dVbl9B3322. 

t. 8448093^2 >66006 24> 

1>904S2S 2>68bb416724>6 

2 > 1 186666 72> 7835833324 >6 

2>33280a332>B8162b 24>6 

2 > 5908333 32 > S'989583324 > 276b 
2>9224b8333>1466 23>7I23 

3 > 3088333 33 > 3 1 224 1 6723 > 0204 
3> 732425 3>4901333322>2b2b 

4> 1971b 3 >6764663321 >4390 

4>69677s 3 >86639 16720 >5999 

5>2263666/4>0636916719>7495 
5 > 79004 1 6 / 4 > 2606 1 667 1 8 > 8967 
6>380I91674>4577333318>0482 
6>997325 4>6b3B166717>2099 

7>640bl66 74>8479416716>3840 
8>308763333>0392b633tb>b732 
V>3b6b333j3>3l9b 14>386b 

1 0> 084 1 83 3 3 > 30096667 1 3 > 6222 
10>8J4973 3>6776916712>8733 
11 >60817!) 3 >8492 12,1434 

I 12>40336676>01S1 166711 >4326 

L3 0 10> 


1 IS 52 It 02S0S 

O 1,3261493 2,466111 17, 

0 1 >476722832,5150353 19> 

0 1,6254973 2,5691848 21, 

O 1,7722913 2,6284933323, 

O 1,8881803 2,6796065 24,6 

0 2,0116 2,7345666724,6 

0 2,225733332,8326083324,6 

0 2,449708332,935 24.4824 

0 2,749408333,07005 24,0146 

0 3,108308333,2275833323.3785 

0 3.514091673,399925 22.6438 

0 3,960241663,582425 £1,8503 

0 4.44285 3,7718833321 .0217 

0 4,9587 3.9657416720,1754 

0 S,5qS6 4,1620666719,3 

0 6,081650334,3592333318,4715 

O 6,6854 4,55595 17,6279 

0 7,315733334,7511833316.7952 

0 7,971566674,944 15.9766 

0 9.001341675.2270916714.7792 

0 9.717558333.410825 14,0030 

0 10,45669175, 5899b 13,2456 

0 11,21874175,7641083312,5063 

0 12.0031 5.9326833311,7854 

1 12, 67025836, 068553 11.2024 

1000, 2.26791667 


Card 7 

£ 0 




1000* 

Card 8 

SHUTTLE 700 PC 

.ms 

1 1 



Card 9 

.0 





Card 10 

sO 

i 




Card 11 

•0 

ImZS 34 lu 

47t632 

•4810 

•000934 

Card 20 

100» -ICO# 

0*0 0*0 

50 • 

90« 


Card 21 

2«0 »2 

•2 •003 

4« 

• 75 


Card 23 


1 




Card 24 

•40123 





Card 25 

1*0 





Card 26 

6«0 





Card 27 

2S0« 





Card 28 






Card 29 






Card 30 

AL203 EQ, OF STATE 

lENO 




Card 31 

1 






Card 32 
Cards 35 


{ 


4170,0 1112.8 1612.1 0,3395 0*2676 

SDATA THlO«>30,,THFt>s7*«TH30sl0* *THlW« 16*366 , RRTb 2, ,CAPN« *67, ZAXs,672 
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SUPLliSONlC Fi.O« analysis USINq The LOCKHEEO-HUNTSVILLE HULTU>LE shock computer PROQRaM 
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SUf’EhifUlUC t’ LOM AKALVStiS USINq THE LOCKHEEO-HuNtSV I LLE MULTIPLE SHOCK COMPUTER PROfiRAH 

.. 6*i-l»AftT«LE— P^^fc-SOtUT-LON- — : 

CAse NO. S2 pace a 

1»U PhA^L lULAt ^AS check CASE ‘ ~ 


L>i 

t 

L>> 

IS> 

00 


RUN CUTOFF mFORHATlON 


•I0CC0*33 


-UPPEil-ijeOhUARi 

-•ICCC3-*D3 THETA* 


•090CC 


-lq» e r - b o unuawt- 


*00000 - X* *50000*02 TKETl^'* *90000*02 

— 


- gPLCIC 




particle phtsical OATa 

■MASS UEN5ITT. 


■ E H ltiSlT ITT ■ 
•OObCC 


ACCH .' ' C O EFF * " 
*00000 


I 


>i»cctc*cl 


•2&CCC*C3 


THE PAKIIcLES constitute <I2*I2 PERCENT 3T KElGHT FLoil OF THE CAS-PART ICLC KtXTtlRE 

-- ThE-TNOIVIOoAL PEhCENTAGES' ARE ItOO ^ 

the FAaTICLE TEiipEhATUttE-ENTHALPT TahLE AlLL UL READ iN *11H ENCLtSH UNITS 


particle tEPPCKATURE-ENTHALPy TAbLE 


PHASE Change OATA .*•• TnELT* *<l|7&C0*ai HSOLIO* *27SSl*l*Ci» HLIOUID* *90398|*08 
CPHELT* 1*0*» - CPSOLfO*— *44978*09 


m 










4X im*p* r ^ 


LOCKHEED -HUNTSVIUq RESEARCH & ENGINEERING CEKTER 


Table 3-ZO (Continued) 



C =3 8 8 


SUPtHSOKiC fLOO analysis using The LOCKHtEO-NUNTSVILLE HULTIPLE shock COHPUTER PR06RAN 
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SOPthiOulC fLO* analysis 0SIN6 ThE UOCKHEEO-mUNTSV I LUE MUETIPLE shock computer PROfiRAH 
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SUPfeHSOhlc' FUO* At4*LTS[S USING THE L'^CKHLED-HUNTSV {LLE MULTIPLE SHOCK COMPUTER PROSRAH 
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NOTES: (1) Typical printout for the startline data surface. 

(2) Some points have been omitted for demonstration purposes. 
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NOTES; (1) Typical printout for a data surface inside the nozzle. 

(2) Some points have been omitted for demonstration purposes. 
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tHPeH*T«Hfc U)CAb--«AHNJL- —SHOCK AMOCe 

EHTHAL-PT 06HS ITT — TEHPERitTURE 


• |(|6«3*C2 

HAHTlLLt I»AIA — 

hO t'AHIlCLi.S AtiE ►'RtStNT At T.HI5 I»OtHT 


• 2U98*5I 


•6ei30*a*i •2as7o«'0‘t ■sh&sh^om iizsoo^ot 


• 13 ^ 27 , t 2 

— 

NO PAKI |CLL6' AJtiL PK£$ENT at THIS POIHT 


A* r I tA A F A . _ . ^ ^ _ — — 

pA^ricUt:* PXtSENf aT 

ijt 

»l2l7y*52 

P«a| ICLt -Opln — 

t.O PA«TltLES AKE PACSENT AT THjb Point 


• H»3Z*01 


• I02tt3'pai 


• H5S9S*0^ •I9l70«'a<l •295&<l«0‘l •t2530«01 


2 4 7 -9 «i 
i4y6|3*»0 



• 2<»7yo>09 *I4H63*04 •29SS4«0N *12500*^01 


• I I 79&+J2 

PuftTlCut OATA - " — ~ 

t*a PAitTt«-LEb AHE PHLSCr,! AT IHIS Point 


• Haiyy+oa >l7aS0>c*l •tS16A<-0'l •2't5S‘l*01 •I2&0S*01 


kl 1131*32 

PAhf ICLfc DATA — 

HU PANliCLEb AHi. PhLSENT AT THIS PolHt 


*2v 928*00 •12A1S»0<I •I290^'*a<i *29559*0^ •1£S||0*01 


••Is9du*:2 

PANT KuL HAT A — _ 

HO PAPTlLLtS AkE PHLSCiiT AT IHIS POt»T 


• i<i9i:7*2a 


••7909*0S «t26as«09 •2HSS990M •l£SOO*Ot 


NOTES: (1) Typical printout for a data surface containing a Prandtl-Meyer Expansion. 
(2) Some points have been omitted for demonstration puirposes. 


p. 

tiwac;# 


^nr WLj ' M * fr 




mm ^ ^ ss esj 

Table 3-20 (Concluded) 


5Uf»t«S0Nlt fLO* AhALtSli USING THE LOCAHEEO-hUNTSV IULE HULTIPLE SHOCR COHPUTER PROGRAM 

' GAS-PArtTICLE Pi.U« SOLA^TiON 

Case- no. S2 


PAGE 78 


Pn^:>L lUAAt. bnS CHECA CAbt 


Li«t Poii. r t/ S crip - kegihc 


H A 

- MACt(-AN6Ue PHfcGSURfc-' 

PakTKcC ■.«5» 

SKCt-lC t UtSCRiPrtUN — . y 


-GENStHf- 


tneTa 

-^fcMPEHA-TUNi 


ENTROPV VELOCITV 

• -GaS-CONS^^* -M>C-AL -GAttHA' 


M-TGIaL itr 

SMOCA (fiAGtS— — — 


tMETA-- 


D r > — 


EM^MAtPY 


OCWSf^lf- —~T~ • 


-ttr- 


A‘t' TRlCuU 


X O H T iN 




i >3 efG»e 2 


8 

X 

X 


•9a5A9*it 

PAJ'lItJ.t UAIA T. _ . 

NO <4n(|(.LL:> AK£ PKCSeNi AT. THIS PolNT 


» a 2 l» <nCl 


r fi a S* l*8 8 


r GtS RG-»8 3 - 




- f e^PERATUUe 
-t- 7 G 3aa * o 8 — — 


.6#‘<H5-0I 


•0922A«C5 


.103S3A-aR 


• 2‘tGS‘'^0^ 


•I2Bog»OI 


*** w wwtf »«»«P w«* *4 


m 

o 


TtT~ 


'T T^ r L 




X 

c 


^"Ai7Tl Ct»- PaTA 

1 1 


• 2<i3:i + :2 




-TZi^ g£*o r 


♦ COi gO-^ 






■■ * a* ^ tfi 

V 4 Mm A i V ■ U V 


f 137ba-C3 


• 3B6B74'Q4| 




l2&Cg+dl 


c/> 

< 


• 76^351+>^ i*CT]CCg *599S|^0l 

TU KLL STHEaHLIUL tKUSblt^t ThE ♦*PIN1 29 haS BttW REPtAC^D 


•2B652^0& 




«3&30l^0^ 






I U3 


*1 >* c € u t 


CDiU in 


</> 




•7&H27* i 

'r 92^,6 'r + :;t- 


P, (jl PAi' r 1 CtL \1 A 
> (iP PA^'tiiwLti AHt PKE.5CNT-AT' TRTS- rolrif 


• I3i5i^ + C2 
.<3r<ms*^:n 


«62 |66-»0l 

•39226-c%- 


* 7cB*|B^c2 
-• fcC3fi3^0'*“ 


• 81S4Bh^03 


• U0^7^0S 


*7H322+0« 


O 


X 

z 

o 


Ii3 


•fALL 


CONI I U 


PAKN>,Lt PAfA 

I I 


*ZZZZZ • lb3d7^C2 




• 2<*269^Si «0C0D0 

■ |37&2»U3~ *35?3H+0^^™ 


• 922C7+0-* 


«6Q37|40*» 


«76t6/^0S 


-.Mib227»’5^ 


"•CCCffU' 


-• SSttI 0-C r r2B5H2’^cB— 


bfr38C7-OH 


w3fel3^^0S- 


m 


z 

Q 


113 


*19 PKfcEtfO * CONyif^ 


o 

m 

z 


» 7 fcHbu + c I 

■ * *9j^6Y + ^|- 

Pi^rtl U 1 1 t^A r A 

NU PA»*n«;ttS Ant PNtSENT A? J lU b PQiNl 


•132ir^r2 

• 69ShS**1 


•62|6b+Cl 

•39226-C& 


#7e6<*9’^02 •815^5^D3 •lt097^QB 

A lc34^3'^C^ ♦’2Hbb^'KI9^*— -% l2bQ04>O'l- 




m 

JO 


in 


aAuL * CONT I M 


P^iKTiCLL LfAIA 

I 1 


• uc:** 

* 2,^ yo9*z2 •839r«i+Ct '' 


«Z423o + :;| 

W I 3/bt»»t3 - 


gQCCDO 

T3S^e3't^^H- 


.^233540H 


•tt03l7«a4 
| 2&00+0i- 


•7frl6H«00 


, 7*i6t*1C* V! 




• 5169*! -Cl 


• •37V66^09 


tb^ 3 TH t A 1 n c"^^ r^ O ^t a > H a T rt f - Hi 1 N f 2fl rlA b - Ot.C N HL e i^ACcU ^ 

* 

ll^ ^H- Pfft£dif CONT it< «7a3^6-p-t *132S3-^02- *62ic76«Oi •7e^bi*Q2- 


-»81S4&«03- 


» I l097»O5-^ 


„-«7H372«06- 


PAKt Ktt PATA - 


• y256?*^l 


•Ay^*!S-C1 


•39226-L5 


• ic3a3«o<i 


82HSS4^0<I 


•12baC^0l 


NO pAMfiCLtb ANt PffESENt AT iMlb PqI*^T 


NOTES: (1) Tirpical printout for a data surface in the exhaust plume. 

(Z) Some points have been omitted for demonstration purposes. 


j i i ri i aA i 1 1| .k‘X.jy..;z- 7 1 3 t , 14^ . . - . - I 'h i, 
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Example Problem 9 

Example problem 9 is the same as example problem 8 except that a 
single phase ideal gas flow field will be anal/zed. 

Table 3-21 presents first flow chart and then a listing of the input 
data for the specified problem. Table 3-22 presents a listing of the perti- 
nent solution. 


3-336 

LOCKHEED . HUNTSVILLE RESEARCH & ENGINEERING CENTER 




I 

I 
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I 

i 

8 

0 

0 

Q 

8 
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Table 3-21 

REQUIRED INPUT FORMAT FOR EXAMPLE PROBLEM 



0 




If gas properties are input on tape (ICON(l)=2) Cards 9, 10 and 11 
required. 
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Table 3-Z2 


EXAMPLE PROBLEM 9 PERTINENT SOLUTION 


SUPERSONIC ruo* TNACTSIS USING f«E LOCitHEEO-HUNTsvl tiE NULTlPtE SHOCIt COHPuTe^ PWGrAH 


:vrsE^'i 


GASEOUS CMECiC C*5^ 


ICQNCI >_ 

I 


0 


I CON Ml 
2 ! 


tC ONISI 

3 I 


tCON fRt 
2 • 


ICCNI99 

0 


ICON(IO) 
15 


icoNnn 


ICON! 12) 

i 


IC 0 NU 3 Y 

0 


tCONiH) 


tCON(15» 


ICON! 161 
200 0 


rLo« calculations are in English units hith the r*a coordinate^ in feet 


THE ftpy field data *IIL NOT WRITTEN ON TAPE 


itrans 
_ 0 

0 


»* 1 0000*01 
•doooio 

> t HOCO*QH 


>50002*00 

•OOOOO 

>00000 


UPPER boundary 
c 

>00000 

*00000 
>00000 


0 

*> 10000*01 

> 27357 «oo 

>OQOQD 


*>10 6 07*01 
>32757*00 
>00000 


HAX 

1flAS 9»00 

> 2 <lS 8 a*Ut 

>ioodo*ur 


TTP£ , ITRANS 


A 

» OOOOO 


>^poop5.^ 


LOWER BO UWOarT 
>00000 




MAX 

_ilMOD*O^L 


there are 0 particle Species present in the sas^particle mixture 


JTNE f 9 Lt9? ? N 9J3 A 5 OP E R T I E S | N E NG L Jt S H U N|TS a«E FOR ID FaL GaS 


V 

lOOOO D 


> l&2S2»0M 


. GAMHA 
>UJH*3*0t 


IDEAL GAS FNO^LRTIES^ 
TO ^ FO' 

,6o<^TA*OH >60D00>Q3 


R X 

•poopp , jOOQOO 
> I 767‘/*0I f ODOOO 

,0 5 fJ?jQXlCO 

>53tM7-01 >00000 

.• 70716-01 __ >00000 

'• A&37S-01 .OQCOO 

v)0An7^Qo_ •qooc'O 

■ 12375*00 .00000 


• 00000 
>00000 
•oocoo 


M THETA 

>io too*oi 4fOa0PP„ 

* 10100*01 *00000 

yy0 1 PP*vT> aPOOOCL-, 

* 10100*01 *00000 

_>iniqo*oi *00000 

^ > 10100*01 >00000 

Ip 100*01 fPOOOP 

> 10100*01 >00000 


5 . 1 *? T ! N 6 line info 

S HACH AWGLE^SHOCK ancle" 

..^fPQOOII •JUTlitOl jJlOMfl 

•ODOOO >Blf3l*Q2 >90000 


>00000 


>eoocQ 

•opco^_ 

•OOOoO 
• t liOO.. 
•OOOOO 


*81931*02 *OCOOO 


iQOOOQ 


joaoca^ jtooo'io.. 


•81931*02 .00000 


■OOOOO 


• 81931*02 _»ODQCa^-, iOOOOO_ 

•81931*02 .00000- .00300 
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Table 3-22 (Coatinued) 


SUlfiRSONlC rtO<l ANAtTSIS VS1N8 TNC t.OCKflEEO-HUNTSVlLLe nULTlPLC SHOCK CON#llTeR PROMAN 



exst NO, 1 





EAGE 2 

GASEOUS CHECK CASE^ 






• 


■ 

■:"f» • 

X 

R 

THETA 

Start iN6~ErNE 
s 

TiiFo 

RACH angle 

SNOCR angle 

0/f 


•lAiSSVoo 
•tssi l♦oa 

«obobb 

•00000 

•10100*01 

•10I00«01 

*00000 

•00000 

•00000 

•00000 

• 01O3UOE 
•Ol«3l402 

•OOOOO 

•OOOQO 

•ooooo ' 
•ooooo 


•I7*TT*00 
, : •19AG7«S0 

•00000 

•00000 

•Tbioo«oi 

•10100*01 

•00000 

•00000 

•00000 

•ooooo 

••1031402 

••l«3l402 

•OOOOO 

•OOOOO 

•ooooo 

•ooooo 

: • 

*2i7fS*bo 

•229A3*og 

•ocooo 

•ocooo 

•toioo*oi 

•I0I00«0I 

*00000 

*00000 

•OOOOO 

•ooooo 

•01931402 

••1931402 

•OOOOO 

•ooooo 

•ooooo 

•OQOOO 


• 2‘l7Sl400 

• 74>*%\n*00 

•00000 

•ocooO 

•10100*01 

•10100401 

•00000 

•00000 

•OOOoO 

•OOonO 

•81931402 

_«8|93l402 

•OOOOO 

•onnqo 

*00000 

•QrOOQ 

Jv: ■ 

: V ^2B7Qf^^OO^ 

.. J 1 ; j* 30 oS^*5^ 

.00000 

_,00000_ 

•10100401 

•10100401 

•00000 

•00000 

. *00000 
•ooooo 

•81931402 

..•81931402 

•ooooo 

. jQOOO.O . . . 

•OOOOO 
•aQOOOQ 

. . ■ m 

V 4XIB22*00 
V vaisva+oij 

•coebo 

_.i 06 boo_ 

•10100401 

•10100401 

rOQOOD 

rOODOO 

•00000 

•ooooo 

•81931402 

•81931402 

•Oopoo 

•Ooboo 

•OOOOO 

•OOOOO 


«3S3S8^00 

•ObOQD 

•10100401 ' 

*00000 

' •ooooo 

•81931402 

•O0O9O 

•bOQOO 

■ 1 - ■ ■ ' ' 


UPPtn 80U»0Af»T 

RUN CUTOFF 

INFOUM^TIOH 

LORE* RnUMDARy 



^"rfia^.'.rviflboo>o3' 

•«IOOOO*OS 

theta* 

“^iboobd 

Ra •ooooo X* 

490000401 

THETAa 

•90000*0 t 

the MESH CONSTRUCTIOH sill ec CONTROLEOS? THE rOLLOatNCVAttlASLCS 

ML interior* .ZOO^OO oX Akisa .1O0«00 Ot LINa •100*01 OL OELETEa •SOO»OZ oCG Ri.N*a .SOOaOl ^4' 

*■ / , 

. ••sofoe 


^sss ca" czD cid' ca csD ca era cm a \ ca - ra 
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P, i ' . jHkIHMt''' 
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Table 3-22 (Continaed) 


SU>iRSON|C ftP» ANALYSIS USIH* THE UOdtHCCO-HUMTsvlitE «UtT|Ptf SHOCK COHPU<^R l*llpSII*f» : ’ : " 

^ Ease *«P. i “ ^ ; ■■ V-: ^ ; V; ■.^■:,•^'^::V■-'/■^'" . PA«E :.:;n: T 




CAbEOUS ClftCK C>St 






’ ■ ' 

\ ■ ; V-.'. ■ ' ' 


LIHE 

point 

0SC«1P • R£GIHC 

R 

NACH ANGEE 

X 

pressure 

H 

OENSITY 

TheTa 

temperature 

entropy 
GAS Const. 

: VEUbeiTY 
'.(.bCAt-;^GAHMA' 

sNbex anSle 

ITR 


1 

l-i 

IfjpUT - CONTIN 

•229s3«00 

hOOOOO 

•IOIOOtOI 

•00000 

•ooobo 

V'i'344:4S*b4' 

•OOOOO 

■■■■' u- 



• j5 

iHPPT CbhTIlT' 

•B|93t«Q2 

«3R|64«03 

•R7S33-02 

,5A3SI*o 4 p 

•I82S2P04 

,r,;*ii443.*o:r 

■ ' ’^.-v ' ^ 

: ' ... 



*2<r75t«0Q 

•0193I«O2 

•Oodo'o 

•3SIART03 

•ioT66*tfr~ 

•47833>02 

• OOOO'Q 
.SA3S1*04 

•OO&Cv 

_,lt252^a4 

•3464V04 

iII44S*&l 

•boboo 

o 



16 

INPUT • CONTIN 

*2&SI8t00 

•00080 

•10100*01 

•00000 

,00000 

•34444*04 

* ,00000 

0 




' * ■ 

•8|»3I*32 

•3Mt6RT03 

•47833-02 

•SA3SI404 

.18252*04 

- •1|443*0| 



1 

W - 

- 

t 

17 

input - CONTIn” 

»2e286*00 

• 8]93I4'02 

•ooobo 

•SRIAM^OS 

•ioibo*bi 

•47833-02 

.00000 

.SA9SU04 

•DOOCO 

.I8?57>04 

•34444*04 

.•ll443*bl 

•OOOOO 

" 0 

1 

10 

Input - coutin 

.360SNT0C 

ftOQOOO 

•10)00*01 

•00000 

•OCOOC - 

.34844*04 

•00000 

0 





.81V3t«02 

• 3<<:AR«03 

•47833-02 

• S63SU04 

♦187E?*04 

VI 1443*01 



• - 

1 


input » CONTIN* 

73182200 

•ObQOo 

^3R1*N^03 

~ibidb*or~ 

•47833-02 

•oOooo 

.S63&U04 

•oooco 

.18252*04 

7;i484»ibT' 

•Il443*p| 

•COOOO 

o 



^ 

INPUT - CONTIN 



.33SROOO 

•00000 

• 10)00*01 

•ODOOO 

•OOOOO 

•3444t*04 

•^oooo 

o 





.«I»3I*C2 

• 3HU<I«03 

•47833-02 

•S635 1 *0^ 

•18752*04 

/|1| 443^01 




1 

2\ 

' Input’ - contin 

.3S3SS«00 

.B|93U92 

•obbob 

l?.** • *8*03 

• ibioo*bi 

.47833*02 

.00000 
.5435 1 ♦OR 

•bbooo 

•18252704 

•34844*04 

•tl443*bl 

•OOOOO 

A 

b“ 



The tuss fuok rate is ■ 

• 209‘«3R*03 













homeRtUh 

roRCEA 

tNTCGR^TlflN RESULTS 
rORCEt TORdZ 

,|Sf^ 







1 


•Mie77*0S 

•OOQOO 

•00000 

• |SS*5*-03 





NOTES; (1) Typical printout for the start line data surface. 

(2) Sonn.e points have been omitted for demonstration purporses 




I 

Table 3-22 (Contintied) 

_ 50PERjgjjt7'-ftq#ni1^lJtlYST5~ySil5 t.OCKHeEO*KUNTSvlLLE NUCTIPLE shock COHiiUTel* PP06««S 

^ ""tvsc mr;-— t -^■' '’ ^^»Gr~lT — 

SA^eous c»^e.cK case ■■ ^ ^ __— — . — — .-■.- 



LINE iPOlnf 

OSCdlP 


W “ 

nach angle 

pressure 

H" 

oehsity 

^arfA"- 

tenperature 

ENTROPT ■ 
6aS const. 

VEtOCSTY 
_iOCA|, ijANHA 

"" «/P 

SHOCK angle 

itK' 


76 

^ 

• ALL 

- COMTIN 

•ocoo? 

•98905*03 

•28lS6*Ql 

.00000 

*00000 

*72031«OR 

*00000 

J 


76 




• 2<t<)&5'*>02 

•36990*02 

• 68S4l7*a3 

.02570*00 

•18252*00 

.11003*01 • 



s 


•ALL 

• CANT IN 

tSTTpT+ag 

•2AAS6*S2 

• *t2'&0903 
•52809*O2 

•22290*01 

•93020*03 

• t53oo'*02 
.00530*00 

•00000 

•18252*A0 

”"'^67860*00""' 

.11003*01 - 

•oniiao ' 

1 

X 

m 

m 

77 

) 

86tt 

- CONTtN 

*000cc 

.t0&12*01 

•20655*01 

■00000 

•00000 

•73070*00 

•00000 

3 

o 

• 

X 


21 

“ 6ALt ■ 


.23T28+32 

•33552*02 

■62905-03 

fRZOSR^OR 

.18752*00 

•11003*01 



c 

X 


• contin 

*S9'tl^+00 

.2Aa&B<»Q2 

•97543*00 

•08396*02 

• 227^57*01 
•86695.03 

.15300*02 

•00002*00 

•OOQOO 

•18252*00 

•68019600 

•I|003*O1 

•00000 


$ 

p 

76 


•all 

- contin 

•Q0D9C 

•11108*01 

•25052*01 

•OOOQO 

.00300 

• 73Re2^ct4l 

• 0(1000 

A 

m 

X 

1 

r 78’ 

u> 

21 



.23S2A*6T 

•31031*02 

*50792-03 

•01602*00 

.l«?S2*O0 

• HR**3*0I 



w 

in 

5 

• all 

- CONtlN 

•61 268^00 
• ?5*l9A*(i2 

*10022*01 

•00213*02 

• 232‘3i*0f~ 
•80110-03 

•15300*02 

.03503*00 

• 00003 
.18252*00 

*7q058^0I| 

*00^00 

1 . 

1 

X 

o 

X 

N 

79 

__-L 

•all 

• CONTJN 

•C03CC 

.11809*01 

.25305*01 

*00000 

•00000 

•70383*90 

4 

•oonoo 

S 

0> 

z 

0 





• 23?77*t)2 

.29517*02 

Vt 11 11*01 
*0O»7C*Q? 

•56277-03 

•01380*00 

•18252*00 

f t|003*Q| 


• 

79“‘ 

21 

WALL 

- CnNT (N 

■*63I5*»*30' 

..2995?t?2. 

'.2S7dS*bi~ 
. •7399Q.Q3 

•15300*02 

j.0.3O06*C4_ 

•obcoa 

^ 1 282*00 

“"”7ib7**d0~~‘ 

•l|003*ni 

•oehob ^ 


z 

m 

m 

SC 

1 

•all 

•• COfitIN 

• OC'^^C 

•12500*01 

•25383*01 

•00000 

•00009 

•70508*00 

"•oonoo 

z 

X 

z 

p 

«0 




• 232(>2*32 

.29068*02 ■ " 

•55528-03 

.01300*00 

.10252*00 

0l 1003*01 


■ * 

a 

m 

21 

flALi 

• CflNTiN 

.65365*30 

.2‘tHAS*92 

•'f 1808*01 

.36923*02 

•20165*01" 

•68038-03 

•~IS300*02“ 

.03565*110 

•00000* 

.18252*00 

*“" *72051 *00 * "* 
• l|0f3*«il 

' oonoo ^ 

"'I 

Z 

-4 

m 

X 

f " 

L 

ffALt 

-contin 

•oaopc 

.13200*01 

.25300*01 

.00000 

•00000 

•70382*90 

•ooooo 

1 

. - 



a 

•23202*02 

•29507*02 

•56328-03 

•01385*00 

•18252*00 

•1 1003*01 
- * 





yr 

- - ■■ ■ 1 - - • 

0611. 

^COMTIN 

■ 669^2*00 ' 
.23982*02 

•12096*01 : 
•33895*02 

•20»O3*Ot 
. .63S08-03_ 

• isliod^ba 
.02108,00 

•00030 * 

• I8252*0ll- 

•72863*00 

•1t903*oi 

•oaqoo 



82 

, f . 

* CONTtN 

• C07<5^ 

•13927*01 

.25162*01 

.00000 

*00000 " 

•70100*00 

•oonoo 

.t-P 






• 2391702 

•30365*02 

•57689-03 

•RIS28«0R 

•18252*00 

•1 1003*01 


■9'. 


NOTES: (1) Typical printout for a data surface inside the nozzle. 

(2) Some points have been omitted for demonstration purposes. 
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Table 3-2E (Continued) 

SUi*^'RS6iji£ AKALV^IS OSjHG the tOCItHEED-HUHTsvtLLE HVilt |PtE SHOCK fQHPUTER PROGRAM 


CASE NO, 


PAGE 


30 


line 


GAbE^US CHECK 
POInT OSCRIP « 


c»sT 

' REG I HE “ R 

. - - - hach angle 


pressure 


H 

OEnSITT 


TheIT 


EHtlBOPf 


“VeLocttr 
loc al g ahha 


n/F 

SHOCK ANCLE 





97 


inter 

- COHTIN 

• 63360 *Oo 

. 25093*01 

« 29 " 73 * 0 t 

. 98245*01 

•00000 

«^2622404 

*nnf>nn 



97 

IS 

Inter 

■' CONTIN 

. 19557*02 

. 11849*02 

. 24973*03 

• 36802 + 0 ^ 

. 18757*04 

• 11443*01 ' 




. 88930*00 
_ . | 9 ? 93*02 

. 25002*01 

_»il 9 ? 9 * 02 _ 

. 29 ’ 987 * 0 t 

^i? 9 S 5 i-gi 3 L_ 

. 10483*02 
| 3 . 87 . 1 i*Q<| 

•ooooe 
■ 1 8 

■ 829004 ^ 0 ^ 

• 1 1 *^ 3*01 

•bnooo 


u> 

97 

16 

iNTfft 

- CrtMrtN 

. 73551*00 

* 24905*01 


• n 160^02 

•OPOOD 

( 

■ R 1 1 1 1 *n*v 


A| 

343 

97 

|7 

■ IMTER 


. 19941*02 

. 11240*02 

• 24205*03 

• 366364 .QII 

. 18757*04 

• 1 ( 993*01 



“ comtin' 

• 19901*02 

'« 24806 * 0 i~ 

* 11134*02 

. 30164 * 01 “ 



. 11920*02 

. 38580*04 

.00000 
. 1 " 257*04 

• 83209 * 0^1 
« 1 1993*01 

- A 

•nnnoo 



97 

la 

inter 

* CONTIN 

. 63849*00 

• 24687*01 

• 3 f|l 4 S* 0 t 

• I 2729*02 

•OD'loe ' 

• ^» 3 ? 77^09 

•onnoo 


‘ 






•t 1009*02 

• 23770-03 

• 3 & 5 Hl *04 

• t 82 S 7 *Cl 9 

• H 99 3*01 




?7 


77 


77 


77 


»9 Inter 
ia^j_NTER_ 
' RALC 

22 PRN-HR 


COMTiN 

CONtiN 


.08997 *30 
. I 935A*02 

.94131.^00 


■ .29SA7«01 
.I099a«02 


'.3r}l72*0I 

.2a6S4-03 


* t 3S72*52 

.38 5 15. 04 


.00000 
. 18?S 2*n4 


coRtin 

COHTIN 


.19348.32 

.toni.j.oi 

.19260*02 


.244 39* 01 
» 10914*02 


.30167*01 

.23S90-03 


.14433.02 


.36500.04 


.00000 


.18257*04 


."3322*09* 

.*ll993*tlL 

»"339^*04 


.11443.01 


•Oonoo 

»3nn00 


.24580*01 .30237*01 ^15300*02' .On^oC* **»>35I4*04 ^CnOQQ 

.10886*02 .23182-0^ .36409.04 . 1675;.Q4 .lJ993*0| 


«10Q02*01 


*24SBo*0| 


.18964*02 


.97213*01 


.30741*01 


.2132|.Q3 


.18789.02 

.35972*09 


.00000 


.64280*04 


.18252*04 711493*01 


.tiofion 


NOTES; (1) 
( 2 ) 


Typical printout for a data surface containing a Prandtl-Meyer expansion. 
Some points have been mnitted for demonstration purposes. 
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Table 3 

-22 (Concluded) 









SUPERSONIC FLO«nrNALVSlS 

USING TKC LOCRHEEO^HUNTSvlLtE NUtT|PbE 

SHOCK COHPbrER 

PROGRAM 


■ 







CASE NO. 

1 




PAGE 3S 



vine 

GASEOUS CHECK CASE 










POIUT 

D5CHJP 

- RE6IHE 

R 

hach angle 

* 

pressure 

n 

oensitt 

ThITa 

temperature 

entro?T 
GaS const. 

VELOCITT 
local GAMMA 

«/f 

SMOCK ANGLE 

*T^Tir 


103 

1 

wall 

- COHTtN 

gQOODO 

•27RA|^0I 

•3oOSl*Ql 

•ooooo 

•OOOOO 

•83171*09 

• OrintlQ 

2 


103 


PrEEuo 


•iRRiJ+a? 

cl 1157*02 

• 2<t0Re-03 

•388D2*0R 

.18252*09 

•11993*01 




iZ 

- CONTtN^ 

• lQ*<i!lS+dl 

• ia9os-»02 

.26000*OT 

.97222*01 

• 3o'ERO*df 
•21329-03 

•15238*02 

.35972*0*1 

•OOOOO 

.18252*09 

•89259*09 
«n 993*01 : 

.00000 



to 1 

i 

9ALL 

- CONI IN 

*90000 

.27883*01 

•39227*01 

•OOOOO 

•00900 

."3915*09 * 

•Ofinoct 

2 


tOH 



- CONtiN 

. I93J9+92 

•10821*02 

*23l 16-03 

.36*161*0*1 

.ia?S2*09 

•1] 993*01 




22 

rPEEBO 

•19513*01 
. I698‘l*02 

.2iS09*01 

.97227*01 

•3cTRd*01 

•21323-03 

•14820402 
• 3S972«CI4 

•OPfiOO **9?S9*09 

_*J«252*09 ..11993*01 





1 


- CONTIN 

eOOOnO 

•28313*01 

•3q37&*01 

•OOOOO 

.00090 

•836S4*04 

•onnao 

2 

tj?' 


i2 

rRXEBO 


*1'»221*'’2 

.1(3^9^»02 

•22775-03 

•36320«04 

.10252*09 

•I 1993«0| 



4^ 

1C$' 

- COUTIM 

*10''2l*3J 
• I8'»8‘**02 

r 26^ 1 a*ot 
.97222*01 

• 3o7'»0*bl 

.21323-03 

• 1*1*»09*02 
.35972*0*1 

♦00900 
• 182524>04 

^9259*09 

^aoftoo"" * 

i* 


^r± 

1 

»Atl 

- CONTIN 

• 9009(1 

•287Si*01 

.30523*01 

•OOOOO 

•OOOOO 

• «390*i*n9 

•Ooooo 

z 


t06 


rp.ttao 


«19I24ir02 

.10179*02 

•22187-03 

.36179*09 

.18252*09 

.11 993 *01 




22 

- contin 

• t972a*Q) 
t(A9S‘'*Q2 

.27291*31 

.97222*01 

• 307<l0*Ot 

• 2!323-p3_ _ 

*.'134934.o2 

•Qonoo 

. •18252*04 

«842S4*Q«i 
_ •11443*01 

.ebbob ^ 

t 

: 3' 


tor 

1 

HALU 

-• coin IN 

.90999 

.29390*01 

.30736*01 

•OOOOO 

•oonoo 

•447S3*Q4 

’ *001101! 

2 






. 18’87*92 

.97301*01 

•2| 338-03 

•35976*09 

•18252*09 

f 11993*01 




107 

22 

PREEbO 

• CONTIN 

• 10i?7‘»*9l 
•Id^BR.qj 

•27A6?*01 
.I?7 222*01. 

.307*«0*0f~ 

..2|321-03_ 

i 13912*02 “ 
.35972*09 

•oonod 

•18252*09 

".',89259*09 

sji?yi*Qi 

■ ,'Qonob 




i 

AAlt 

• CONTlK 


.3oOHS*OI 

•3q9S2*0I 

•OOOOO 

•ooooo 

•84802*04 

•ooooo 

2 


lOA 


’ FRCrtuT 

A 

• iaAM9*02 

.93015*01 

•20SIH-03 

•35772^04 

•te?5?*09 

.11993*01 




22 

■- C0<«TI«' 

■ .11029*01 ■ 

_. I A’fl9j92 

,2«S03*9l " 

.,97222*01 

• 3079O*bT~ 

• 21323^03 

.I2837*02~ 

.35972*09 

•OOOQC 

•18252*0%: 

,89259*09 

ljj.9i3*01 

•oonoo 

‘““2' 



1 

7 ' ■ ■ 

hall 

- CONTiN 

.09090 

.30717*01 

.31169*01 

.00000 

•ooroo 

•R49S24Q4 

•oonon 

.2 






.18713*92 

.88881*01 

.19715-03 

•35568*09 

•18252*09 

, 1(993*01 


*• 


NOTES; (1) Typical printout for a data surface in the exhaust plume. 

(2) Some points have been omitted for demonstration purposes. 




Section 4 
CONCLUSIONS 

A versatile computeir program has been described in the preceding 
sections. The code has numerous options which have necessitated a some 
what generalized set of input data. These options include; 

e Gas -Particle* Flows 

• Chemistry 

Equilibriuti^ 

Kinetics 

Chemically Frozen 
Constant Th'^rmodynamics 

• Single -Phase Solution 

Non-Isoenergetic Flow 

• Non-Continutim Flow 

• Performance Calculations 

• Shock Waves 

In its present form, the code has the capability of producing data for 
the following applications: 

• Gas/Gas-Particle Impingement (Heat Transfer Loads) 

• Socket Nozzle Performance (Thrust, I ) 

sp 

• IR Signatures (Radiating Species) 

• RF Attenuation (Electron Densities) 

• Plume Radiation (Radiative Heat Transfer Gas/ 

Particles) 

• Vehicle Base Pressure 

• Base Heating (Convection -Recirculation) 
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A primary consequence of this work is the extension of gas>particle 
solutions to treat chemical kinetics for no sale -exhaust plume flow fields. 
Since the code has the option of treating single-phase flow, chemical kinetics 
can also be included in liquid propellant motor analyses as well as solid pro- 
pellant calculations. The method by which the kinetic equations are modeled 
also permits thermal nonequilibrium to be treated. 

The RAMt* code is an advance in the state of the art in the area of two- 
phase flowfield numerical solutions. Future development of the code may be 
done in the area of imbedded subsonic regions (Mach disks) and subsonic- 
supersonic mixing. 
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Appendix A 

USER'S INPUT GUIDE FOR THE RAMP 
RADIAT, LOOKUP PROGRAM 
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Appendix A 


CARD 1 - Run control card 
Format: 1615 


Column Parameter Value 


Description 


5 lORDR 


10 IWRITE 


14-15 ISP 


20 IDUMl 


0 Will not call data ordering routines but 
will execute lookup routines. Ordered 
flowfield tape must be input. 

1 Will order flowfield data and generate 
Radiance tape. 

2 Will order flowfield data but will not 
generate Radiance tape. 

0 No intermediate printout in property- 
lookup routines. 

1 Use a one only if problems are encoun- 
tered with program and intermediate 
printout is necessary to determine pro- 
blem. 

0 Species and species concentrations will 
come from flowfield tapes or finite- rate 
chemistry case. 

N Number of species and species concen- 
trations to be read from cards (Assumes 
species and species concentrations con- 
stant throughout plume.) (25 max). 

0 If two entropy tables are present on the 
RAMP tape both tables will be used to 
determine local flow properties and 
species concentrations. 

1 Only first entropy table will be used to 
determine flow properties. 

Ignore for finite rate chemistry case. 

A-1 
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CARD 1 (Continued) 


Column 

23-25 

26-30 

35 


40 


45 


50 


54-55 


60 

65 


Parameter Value Description 

IXCUT N Number of axial cuts to be written on 

flowfield tape. The values of the cuts 
will be read from Card 10 (100 rriax) 

KASE N Case number t- be written on R3'‘^i3'hCe 

tape, 

INUNIT 0 Output pressure and temperature in 

English units. Temperature, °R; pres- 
sure, lb/ft2 


1 Output pressure and temperature in 

metric units. Temperature, °K; pres- 
sure, atm. 

liSOLflD 0 Do not perform 2-phase flow energy cal- 
culations for heating analysis. v 

1 perform 2-phase flow energy calculations. 

LSOLGS 0 MOG input tape on Unit 8, 

1 RAMP input tape On Unit 8, 

INRS 0 No radiation data on input tape, 

N Number of radiating species on input tape. 


NS 0 Equilibrium or frozen chemistry, 

N Number of species on input tape for finite 

rate chemistry case (RAMP Only) (25 max)» 

IPSTR 0 Pitot pressure data not on input tape. 


1 Pitot pressure data on input tape. 

KUNIT 1 English units used internally. 

2 MKS units used internally (Required only 
if NS>0). 
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CARD 2 

Reference Card for Property- Lookup, These data are used to non- 
dimenslonalize the axial hnd radial coordinates which are to be looked up 
in the ordered flow field. 


Format: 

3E10,6 


Column 

Parameter 

Description 

1-10 

XREFF 

Ax: ,1 coordinate to which each input 
axial station is referenced (ft or m). 

11-20 

ST 

Reference length by which all input 
axial stations and radial coordinates 
are multiplied (ft or m). 

21-30 

RREFF 

Radial coordinate to which each radial 
coordinate is referenced (ft or m). 

NOTE: 

RREFF, XREFF and ST 

X = X'i'ST-'XREFF 
R = R*ST-RREFF 

are used as follows (in main routine only): 

CARD 3 

This card contains the necessary information to limit the calculations 

to those 
Format: 

areas of interest. Units are consistent with the ordered flow field. 
8E10.6 

Column 

Parameter 

Description 

1-10 

CUTDAT(l) 

Radial coordinate defining upper cut off 
(ft or m). 

11-20 

CUTDAT(2) 

Axial coordinate defining upper cut off 
(ft or m). 

21 -30 

CUTDAT{3) 

Angle cutoff line makes with horizontal 
(deg). 
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CARD S (ContiJwed) 

Column Pararoeter Description 

Radial coordinate defining downstrieam 
cut off (ft or m). 

41-50 CUTDAT(5) Axial coordinate defining downstream 

cut off (ft or m). 

51-60 CUTDAT(6) Angle cut off line madces with horizontal 

(deg). 


CARD 4 

This card inputs radiation data onl/ when INRS (Card 1) is greater 
than zero. 

Format: 5(A6, 6X) 

Column Parameter Description 


1-6 AIDR(l) 

13-18 AIDR(2) 


Name of first initial radiating species. 
Name of second initial radiating species. 


AIDR(K) 


Name of last initial radiatinj species, 
where K=INRS, 


Q 

fl 

8 

8 

8 


s 


D 


8 

8 

8 

0 

D 

8 

I 

I 
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, CARD 5 



Format: 5(A6, 6X) 


Column Parameter Description 

1- 6 AIDRT(l) Name of species that A1DR('.) transforms 

to during radiation, process. 

13-18 AXDRT(2) Name of species that A1DR(2) transforms 

to during radiation process. 

* ...m . , , f ■ 

« .'i. 

AIDRT(K) Name of species that AIDR(K) transforms 

to during radiation process. 

CARD 6 

Control card for the ordering section. Cards 6 and 7 are used only 

when i6rDR (Ca.rd 1) is greater than zero. 

Format: 1615 ^ ^ ^ 


Column 

Parameter 

Value 

Description 

5 

IS TART 


Ordering the flowfield data will begin 
with this characteristic line nuni>er^ 

10 

ISIGN 

-1 

If the flow field was generated with a 
reflected shock from the nozzle axis, 
otherwise leave blank. 

IS 

NUMBER 


Number of flowfield data points desired 
per data record (max. of 300). 

20 

IDEL. 

>0 

If anv points are to be deleted from the 


flow field. 
A-5 
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CARD 6 (Continued) 


0 

0 

n 

Column 

Parameter 

Value 

Description U 


IPRINT 

>0 

K intermediate data are to be printed as p 

the flow field is ordered by distance from |j 

the engine exit plane. 

30 

ITERM 


Characteristic line number, where order- |! 

ing of flowfield data is to be terminated. 

(This line is not used by program). 

n 

35 

ISEND 

1 

If plume boundary is to be curve-fitted 0 

for use in the interpolation scheme. 



2 

If only the cutoff limits read as input y 

data are to be used to see if a point is 
within a prescribed boundary. 

40 

ISKIP 


If ISEND = 1 every ISKEP line will be li 

examined for a free boundary point. 

n 

CARD 7 



u 

Column 

Parameter 


Description Li 

i-10 

RREF* 


Radial coordinate to which each flowfield p 

data point will be referenced (ft or m). Ij 

11-20 

XREF* 


Axial coordinate to which each flowfield 

data point will be referenced (ft or m). || 

21-30 

DELETE 


One of two points with a distance between 
them less than DELETE will be deleted O 

from the flowfield data. Will not delete iJ 

shock point. 

31-40 

DIAM 


Reference factor, units consistent with Ij 

plume dimensions. Can be used to scale, 
etc., the local plume coordinates. 

0 


The coordinates XREF and RREF are used to accomplish ainy desired ^ 

coordinate system translation. 

D 
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NOTE: RREF, XREF and DlAM are used as follows: 
R = (RrRREF)/DIAM 

CARD 8 


This card inputs particiilate heat transfer data and is used only if 
LSOLlp (Card 1) is greater than zero and when lORDR is greater than zero. 

Format: 6E10, 6 


Column 


1-10 


11-20 


21-30 


CARD 9 


Parameter 


ACOMCF 


TWALL 


Description 


Accommodation coefficient. 


Wall temperature (°R or °K), 
Particulate phase heat capacity. 


Species concentration cards (Input only if KP >0 and NS =0) these 
cards contain the species names and mole fractions if the species concen- 
trations are constant throughout the plume. There are four species per 
card up to a maximum of 25 species. Overrides species on flowfield tape. 

Format: 4(A6, 4X> E10.6) 


Column 


11-20 


Parameter 
S0NAME(I, 1) 


AMO(I) 


Description 

Species name — left adjusted, consistent 
with RAMP species names. 

Mole fraction of species. 


NOtE: Repeat S0NAME and AMO* 4 pairs io a card until all ISP species 
^ areread in. , . 
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CARD 10 

This card(s) reads in the axial stations and the radial increment to 
he used in constructing the ra.diance tape. There are 2 stations per card 
up to 100 stations. 

Format: 6E10.6 


Column 

Parameter 

Description 

1-10 

X(l) 

First axial station at which radial dis- 
tribution of flowfield properties are de- 
sired (ft or m). 

11-20 

DR(1) 

Radial increment between data points 
along radial for station 1 (ft or m) 

21^30 

RMAX(l) 

Maximum value of radial distance desired 
for station 1. If zero, program determines 
maximum (ft or m). 

31-40 

X(2) 

‘ "f ■ ■ ■ • ■ 

Second axial station at which radial dis- 
tribution of flowfield properties are de- 
sired. 

41-50 

DR(2) 

Radial increment between data points along 
radial for station 2. 

51-60 

RMAX(Z) 

Maximum value of radial distance desired 
for station 2, If zero, program determines 
maximum. 


Repeat until DCCUT (Card 1) number of stations have been input. 


s 

I 
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Table A-1 

MAGNETIC TAPE ASSIGNMENTS FOR THE 
RAMP RADIAL LOOKUP PROGRAM 


Where Required 

Tape Units 

Tape Unit Function 


U-U08 


Section 1 



SORTCT 

10 

Flowfield tape generated by 



RAMP program- input. 

Subroutine SORTCT is the 
controlling routine for this 

8 

Flowfield data ordered for 

section which arranges the 
RAMP output in the form 


use in property lookupr-output. 

used b/ the data acquisition 

2 

Flowfield limits datar-output. 

routines. This section is 
used once per flowfield 
calculation. 

3 

Scratch tape. 


4 

Scratch tape for species 
concentrations & radiation 
data. 

Section 2 



GENERATE RADIANCE TAPE 

4 

Radiance tape-output 

This section performs the local 

8 

Ordered flowfield data gene- 

property lookup and generates 


rated by Section 1— input. 

the radiance tape. 

2 

Flowfield limits data gene- 
rated by Section 1— input. 
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ABSTRACT 

Various assumptions are used by many organizations to compute rocket 
motor plumes. In applying plume data, the question of accuracy invariably 
arises. Some guidelines are therefore needed to estimate the accuracy 
of the plume data based upon the assumptions that are employed. This paper 
is intended to serve as a guide for estimating plume accuracy and to alert 
the plume analyst to the magnitude of error which might be expected if 
certain assumptions are used. Much of the information contained in this 
paper, however, is based upon somewhat subjective data and/or certain cases 
from which some experience has been gained. The data presented should, 
therefore, be used Judiciously, the problem at hand should be carefully 
considered, and the fact that the error bands have been somewhat grossly 
estimated should be kept in mind. 
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INTRODUCTION 
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During the past several years sophisticated techniques for computing 
rocket motor exhaust plumes have been developed. The prediction methods can 
take into arcount such influencing parameters as combustion chamber losses, 
flow striations, reaction kinetics and non-continuum effects. VHien a plume 
flow field is to be computed, the degree of analytical sophistication that 
will be used should be based on an assessment of such factors as: (l) ulti- 
mate purpose of the data; (2) time available to accomplish the calculations; 
and (3) degree of accuracy required. In most cases, all effects that can be 
calculated should be included in the calculations. To include all effects may, 
of course, be time-consuming; this is not always practical if schedules are 
to be met. Plume data are therefore sometimes generated which circumvent 
the various effects that are felt to be small. Since much plume data are 
generated by using various assumptions, some guidelines are needed to esti- 
mate the accuracy of the resulting plur«es based upon the assumptions that 
are employed. 

Although an absolute accuracy cannot at this time be assigned to the 
f jnal numbers generated for any given plume calculation, at least a reason- 
able estimate can be made of the anticipated accuracy, depending upon the 
various assumptions. Some of the assiunptions Influence specific regions of 
the flow field, and the accuracy of the calculations varies with position in 
the plume. 

This document is intended to serve as a guide for estimating the accu- 
racy of axisymmetric plume flowfleld calculations. Much of the information, 
however, is based upon somewhat subjective data and/or certain cases (per- 
haps even unique cases) from which some experience has been gained. Also, 
only steady state rocket motor operation is considered. Ignition and shut- 
down transient influences are omitted. 


DISCUSSION 

The effects which are considered important in plume calculations are 
categorized and discussed in this section. Tables I and II summarize the 
important flowfield parameters and the estimated percentage of error that 
may be introduced by each item. The error that is discussed is the error 
which could exist if an accurate evaluation of the influence of the item is 
not included in the plume flowfield analysis. The error bands in Table I 
are considered to correspond to worst-on-worst or three-sigma cases for a 
95 percent confidence interval. The error bands are rather large since they 
reflect the maximum values which have been observed. Most rocket motors will 
not encounter these effects to the extent shown in Table I. A set of data 
corresponding to an estimated one-sigma deviation for a 95 percent confidence 
interval is presented in Table II. The items which contribute to the accu- 
racy bands shown in Tables I and II are discussed in the following paragraphs. 
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Motor Operating Conditions ; Motor operating conditions refers to the 
fact that rocket motors are generally specified to operate at a nominal set 
of conditions (chamber pressure, mass flow rate, and oxidizer-to-fucl ratio 
(o/l''))* Variations from nominal conditions frequently occur during actual 
operation* A band of + 10 percent was arbitrarily assigned for chamber con- 
ditions (pressure, o/p'ratio, mass flow). TnPluencea of this + 10 percent 
band on other motor and plume environmental conditions are sh(^ in Table I 
and Table II. 

C<mibustion Chamber Momentum Loss and Efficiency ; Combustion chamber 
mmenturo loss and efficiency is Included because combustion in a rocket motor 
does not take place at zero velocity as implied by an equilibrium, infinite 
area ratio calculation. The situation actually is analogous to heat addition 
in a finite area duct which results in a decrement in total pressure. The 
maximum momentum loss that can occur is a function of the propellant system 
and motor geometry and it can be as high as 20 percent of the actueO. pres- 
sure immediately downstream of the injector face. Most motors, however, fall 
in the range of 2 to 15 percent momentum loss (Ref, 1), 

Coupled with the momentum loss is combustion efficiency; i.e,, incom- 
plete mixing and/or reaction of the incoming propellants. This anomally 
first appeared when experimental performance dats were compared with computed 
data. Even when all known performsmee losses were included in the analytical 
prediction, some descrepancy still existed. This discrepancy has been termed 
combustion efficiency and several theories have been proffered as possible 
explanations. The JAMAT Performance Standardisation Committee has recom- 
mended an arbitrary reduction in the initial propellant energy to account for 
this loss (Ref. 2). Recently, however, this committee has been working on a 
droplet varporization model which will be recommended as the explanation for 
combustion efficiency. Whatever its source, combustion efficiency must be 
properly estimated to increase the accuracy of the exhaust plume calcula- 
tion, The most striking resxilt of combustion efficiency is a temperatwe 
prediction considerably below that predicted by the usual adiabatic flame 
calculation. In this paper, the moment^un loss and combustion efficiency 
problems are combined and assigned a maximum error, which corresponds to the 
deviations that have been observed between motor performance test data and 
theoretical results for no-momentuim loss and for complete equilibrium chem- 
istry combustion at a nominal motor operating value of O/P. 

Flow Striations (o/P Ratio Gradient ); The flow striation problem is a 
result of non-uniform distribution of propellant mixture ratio within the 
combustion chamber. Flow striations may be deliberately induced in the 
nozzle flow, as in the case of film cooling, or it may result from incomplete 
mixing and/or combustion in the combustion chamber. The effects that are in- 
troduced are variations of the thermochemical data due to combustion at a 
local o/P ratio which is different from the nominal o/p value (Ref. 3)« 

Tables I and II show error bands relative to the nominal o/P value. 

The flow striation effect may be closely related to the combustion effi- 
ciency problem; however, these effects are considered independently in this 
paper. 
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Reaction Kinetics i Reaction kinetics, as used here, involves the 
problem of appropriately defining the location in the flow field where the 
chemical reactions deviate from equilibrium enough that the flow can be con- 
sidered chemically frozen. Prom this point on, the species concentrations 
are constanv and the thermodynamic properties vary only with temperature. 

The problem tlms is one of correctly assessing a representative freeze 
point. The error bands shown in the charts relate the error magnitudes re- 
sulting from ccmpfirison of results for a finite rate chemistry analysis 
(Ref, 4) and results obtained by an assmed freeze point based on an equi- 
librium/frozon chemistry analysis. The errors presented are the range of 
values which can be expected in the highly expanded plume. The errors in 
the field nearer the freeze point are not nearly as large. The major source 
of the errors is related to differences in the values of the thermodynamic 
properties used to calculate the flow field. 

Non- Continuum Effects ; The error caused by non-continuum effects is due 
to the lack of rigorous flow models which can consider the gradual deviation 
in thermodynamic properties which resxilt as the rate of intermolecular col- 
lisions is reduced below a value corresponding to thermodynamic equilibrium. 
The error bands which are listed in Tables 1 and II for this item refer to 
variations which occur between a rigorous non-continuum solution (Refs, 5 
and 6) and a sudden-freeze solution which uses continuum flow equations until 
a "free-molecular" condition is reached (Ref, 7). ^Vhen this freeze point is 
reached, the flow calculation is handled as a free molecular calculation. In 
the transition flow region (Knudsen number greater than O.l) the error in- 
creases until the sudden freeze condition is reached. The maximvun error 
occurs near the freeze point and is the error shown in Tables I and II. Be- 
yond the freeze point, the rigorous solution and the sudden freeze solution 
tend to converge toward common values (Knudsen number greater than 1,0). The 
sudden freeze solution yields results which show significant deviation in 
static temperature. Density and velocity calculations, however, are not 
greatly affected. 

The error bands shown in Tables I and II are based upon the differences 
found between cases analyzed with: (l) a sudden freeze analysis; and (2) with 
a rigorous theoretical solution. An additional large error, not shown In the 
charts, would appear :'.f the rigorous analysis were compared with an all con- 
tinuum analysis. This would result from the fact that the temperature in a 
continuum analysis approaches a zero limit while the rigoious solution indi- 
cates that the temperature approaches a low but finite value, 

Cnlculational Accuracy ; This item is an arbitrary estimate of the maxi- 
mum error conceivable for the numerical computational procedirres used. 
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Viscous Effects (Boundary Layer) ; The viscous (boundary layer) effects 
of the nozzle flow have been shown to be of minor consequence on the in- 
viscid flow in the nozzle. (That is, if the boundary layer is considered In 
terms of displacement thickness to alter the nozzle contour, the effect on 
the nozzle flow is generally negligible.) The effect considered here is that 
the bo\andary layer will influence the plume flow field to some degree and 
will cause the maximum expansion angle at the nozzle lip to be significantly 
different. Basically, the boundary layer will tend to; (l) permit the flow 
to expand well beyond the limiting inviscid expansion angle at the nozzle 
lip; and (2) alter the temperature, pressure and density in the portion of 
the theoretically Inviscid plume which is influenced by the boundary layer. 
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The boundary layer affects the entire plume to some extent '?ut the most pro- 
nounced effect Is in the outer kO percent of the mass flow within the plume 
(Kefs. 8 and 9), 

Condensation ; For a rocket motor, the influence of gases condensing in 
low temperature flow fields has been numerically evaluated only to a limited 
extent. The condensation will usually occur at low temperatures, at low 
pressures, and at velocities near the limiting velocity of the gas (Ref, 10), 
Hie influences will occur in the highly expanded regions of a flow field cor- 
responding to temperatures below the condensation temperature of the gas. 

(The flow upstream of the condensation point is not influenced.) Normally 
the condensation will occur at points in the flow field where the temperature 
is some 10 to 50°K below the eqjiilibrium condensation point. After initial 
condensation takes place, the temperature/pressure relations of the flowing 
system will tend initially to be parallel to and then to converge toward the 
temperature/pressure variation of a static system in equilibrium. Condensa- 
tion will cause local static pressures to be different than they would other- 
wise be by factors of 0 to -100 (condensation causes lower static pressures). 
Static temperatures will be influenced (with respect to the no-condensation 
case) by factors of zero to +5 (condensation increases static temperatures). 
The influence of condensation on some of the other parameters has not cur- 
rently been defined to a sufficient degree but consequential effects can be 
expected. 

Start I.ine ; The influence of the starting flow conditions has been ob- 
served to have significant effects for regions close to the start line (Refs, 
9, 11, 12, 13, l4) but these effects tend to weaken farther downstream (2 to 
4 start line diameters downstream of the nozzle exit) . Hear the start line 
some parameters may be locally in error by almost a factor of 10 (between an 
estimated and an accurate start line) . Downstreasi the errors will tend to be 
smellier (on the centerline, less than 25 percent; in the expansion region, as 
much as 50 to 100 percent) . Plume calculations that are begun at the nozzle 
throat tend to be relatively free from start line effects. Plume calcula- 
tions initiated at the nozzle exit tend to permit errors in local properties 
that correspond to a position error in the flow field of plus or minus one 
startline diameter. 

Shock Vfaves ; If shock waves in the nozzle and flow field are not con- 
sidered, and a plume is computed as an isentropic flow, the errors in the 
plume flow field are similar in magnitude to those associated viith start line 
effects (item 9), (Refs. 8 and 9) except that in the immediate vicinity of 
the shock wave, variations in flow properties can oe extremely different from 
the "no-shock" case. The greatest influence tends to occur along the center- 
line of the plume where the shock wave is strongest. In the highly expanded 
portion of a high-altitude (near vacuum) plume calculation the influence of 
the shock waves diminishes as the shock waves become weaker and weaker. 

Tables I and II present the maximum error band values anticipated along the 
centerline of a plume. 

Error Rand Application : Tables I and II list plume flowfield parameters 

and the estimated maxitnuju percentage error imposed upon them by the various 
items (1 through 10) listed in the preceding discussion. Tlieir application 
is restricted to locations in the plume specified in Table III and in the 
preceding discussion of each item. Applicatior of the error bands should be 
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made considering that each error contribution may only partially exist for a 
particular plume, and the rms values of the sum should normally be used* In 
the application of error bands to design data, often a simple means of ex- 
pressing tlie error band is needed. As a result, a nominal accuracy (or error 
band) representation has been devised for use on a general basis, Tliis nom- 
inal accuracy should be based upon and reflect, for any particular plume, 
rms summation of various error contributions cited in this paper. The rms 
errors should be resolved into a maximum percent error of combined spatial 
position and flow parameter value. The spatial accuracy band is arbitrarily 
assigned as being equal in percentage magnitude to the quantitative accuracy 
band. Results of numerous plume calculations and experimental calculations 
indicate that the flowfield structure (shock wave locations, etc.) can be in 
error as a result of the various factors. Some of the effects which produce 
flowfield parameter quantitative errors, also proiuce flowfield structure 
positional errors. Conversely, a highly accurate plume calculation will 
necessarily reflect accurate flowfield positional accuracies, Caisequently, 
combining the spatial and quantitative accuracy bands is logical. For ex- 
ample, a plume nominal accuracy band might, by the inspection process, be 
assessed at +20 percent, which means that the calculated location of a 
particular flow featiure (a shock wave for instance) may be in error by +20 
percent In both the axial and radial position; also, the magnitude of the 
flowfield parameters may additionally be in error by +20 percent. 


In siimtnary, the process of defining a nominal plume accuracy should be 
accomplished by; 

1. Assessing the applicability of the various items which contribute 
errors to the computed plume flow field at various plume locations 

?, Determining the rms error band for each flowfield parameter for 
numerous points in the plume 

3* Obtaining a "nominal plume accuracy band" rms value by averaging 
the rms error bands of the various points in the flow field, 

CONCLUSIORS 

Factors that affect the accxiracy of plume calculations have been cate- 
gorized, and anticipated ranges of errors associated with each pl\ime param- 
eter have been estimated. This information is provided for reference and is 
intended to serve as a guide in estimating the overall accwacy of any given 
plume analysis based upon the assumptions employed for the plume calculation. 
Absolute values of accuracy are almost impossible to assign to pl\une calcu- 
lations, Therefore, the data presented should be used Judiciously, and the 
problem at hand carefully considered, including the fact that the error bands 
have been somewhat grossly estimated. 


SYMBOLS AND NOTATION 


Force 

force 

M 

Mach number 

m 

mass flow rate 

o/f 

oxidizer /fuel ratio 
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i 

y 

p 


static pressure 
total pressure 

pitot total pressure 

static temperature 
total temperature 

vel..ooity 

i species 

isentropic exponent 
density 
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TABliE I. ESTIMATED RANGE OP- PERCENTAGE OP ERROR FOR VARIOUS PARAMETERS 
IN PLUME FLOW FIELD FOR A 3-SIGMA DEVIATION AT 95% CONFIDENCE 
INTERVAL 
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* Not meaningful 

** Affects mainly the outer 40% of the mass flow (see Discussion) 
A Not defined 
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TABLE II. ESTIMATED RANGE OP PERCENTAGE OP ERROR FOR VARIOUS PARAMETERS 
IN CALCULATED PLUMB FLOW FIELDS FOR l^SIGMA DEVIATIONS AT 95?& 
CONFIDENCE INTERVALS 
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Appendix G 

The results obtained from the Reacting and Multiphase Computer Pro- 
gram (RAMP) are very sensitive to data which are input. For two-phase 
cases the mean particle size, distribution of sizes, specific heats, mass 
density, particle melting temperature, ^emistry assumptions and boundary 
equations are the primary input variables which determine the results. Each 
of these variables will be discussed in some detail and suggestions will be 
made as to what values can be used for aluminized propellants. It should be 
noted, however, that the data presented is not necessarily the best available. 

Mean Particle Size 


Several different methods have been emp' oyed for obtaining mean par- 
ticle size. Included are teclualques which correlate mean size to throat diam- 
eter (Ref. C-1), mean motor L (Ref,C-E) (chamber volume/throat area), 
chamber pressure, residence time, particle loading, maximum stable droplet 
size as well as combinations of each of these parameters. As a simple esti- 
mate of mean particle size the correlation of Delaney (Ref. C-1) based on throat 
diameter can be used: 


D 


m 


4 D 


.3 


(C.l) 


where D is the mean particle diameter in microns and is the throat 
m t 

diameter in inches. 

Particle Size Distribution 

For nozzle calculations in which no particle impingement on the wall is 
anticipated, one particle size at the mean size can be used. However, for 
plume calculations a knowledge of the particle size distribution is necessary. 
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ihc distribution of particles for smaller 
motors (D; < 3 .5 in .) followed a log normal distribution (Fig . C - 1) , F or the 
large motors (Pj, > the data indicate that the size distribution follows 

a normal distribution (Fig. C-2)k To use these distributions: move the curves 
up or down to the mean size at the 50% coordinate, then divide the curve into 
5 or 6 sections and determine the mean size that goes with each of these 
sections. Table C?1 giyes an example of the size distribution (for 6 discrete 

sizes) which was determined from ^ 

Particle Specific Heats, Enthalpies and Melting Temperature 

The values for particle specific heats, enthalpies and melting tempera> 
ture which the authors use are shown in Table G-2. The specific heats shown 
are used for the ideal approximation of particle enthalpy verses temperature 
(i.e., the specific heat for liquid and solid phases of the aluminum oxide are 
constant). The user may find the tables of temperature verses enthalpy in 
the JANAF Thermochemical Tables (Ref,C-3). 

Particle Mass Density 

The mass density for aluminum oxide is different for the solid and liquid 

phases. Reference C-4 shows the mass density of liquid aluminum oxide (Ajf_0_) 

3 * 3 

to be 188 Ibm/ft . The mass density of solid is 250 Ibm/ft . For cases 

where the particle temperatures will be higher than the melting temperature 

for most of the flow field, the liquid mass density should be used. In cases 

where the particle temperature will be below the melting temperature (i.e., 

plumes) the solid mass density should be used. 

Chemistry Assumptions 

There are numerous chemistry assumptions which can be employed by 
the RAMP code. The various assumptions are: (1) ideal gas (constant specific 
heat ratio and molecular weight): (2) equilibrium; (3) frozen (constant molecular 
weight, varying specific heat ratio); (4) equilibrium/frozen (equilibrium with the 
molecular weight constant below a specified pressure) or (5) finite-rate chemistry 
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Table C-l 



LOG NORMAL PARTICLE SIZE DISTRIBUTION 
FOR HI 5 PC MOTOR 


Particle 

Diameter 

Percent Total 
Particle Mass 
Flow 

1.2 

10 

1.9 

20 

2.65 

20 

3.5 

20 

5.0 

20 

8.0 

10 


Table C-2 

THERMODYNAMIC DATA 


Liquid Ai^O^ Specific Heat (C ) — 

,34 Btu/lbm^R 

jf 

Solid At^Q^ Specific Heat (C ) — 

.32 Btu/lbm°R 

Enthalpy of Solid Phase of Af20^ ~ 

1358.9 Btu/lbm 

at Melting Temperature 


Enthalpy of Liquid Phase of Af20^ 

1858.7 Btu/lbm 

at Melting Temperature 


Melting Temperature — 

4188°R 
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The t/pe of chemistrjr assumption is very case dependent and also 
depends on the use of the flow field. Table C-3 presents various cases 
and applications, along with suggestions as to the t/pe of chemistry 
assumptions to be used. 

Finite rate cases can generally be started at the nozzle throat assuming 
the species distribution is in chemical equilibrium since this is valid for most 
propellant systems. Taoles C-4 through C-6 present some reaction mech- 
anisms which may be used for applicable propellant °vstems. These reaction 
mechanisms were obtained from data presented in Ref.C-5, 

Boundary Equations 

The boundary equations which are input to the code should be smooth 
and not contain discontinuities in either the slopes or coordinates where no 
discontinuities are physically present. Fictitious discontinuities can result 
in undesirable mass flow errors showing up during a solution. In Fig. C-3 
a description of the boundary equations for the nozzle throat and free boundary 
are presented. 

More complex nozzle contours may be input with discrete points which 
define the wall as a function of radial position and flow angle versus axial 
position. 
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Table C-^ 

SUGGESTED CHEMISTR i ASSUMPTIONS 
FOR VARIOUS APPLICATIONS 



Use specific heat ratio which exists at lip. 
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Catalytic Si 


Mj = 3 H 2 O, 2 CO^; AU oth 
= 20 H, 10 H^O, 3 CO 2 , 
M 3 = 20 O 2 , 10 H 2 O, 3 CO. 
V 10 H 2 O, 5 HCi. 5 a. 


22 

o« i 0~<i6 

2*0 

0*0 

21 

2 * 00-32 

0*0 

0*0 

24 

3 * b 0-30 

1 *0 

- 340*0 

22 

2 * 20-30 

1 mO 

0*0 

14 

1 *<| 0 - 14 - 

■1 *g 

- 7000#0 

1 1 

4 * 00-11 

0*0 

0*0 

14 

1 * 00 - 17 - 2*0 

- 2900*0 

13 

1 * 00-1 1 

0*0 

- 1100*0 

23 

2 * 00-33 

0*0 

- 4000*0 

14 

1 * 10 - 19 - 2*0 

1600*0 

24 

4 * 30-31 

1 *0 

1250 *0 

22 

3 * 00-30 

1 *0 

0*0 

14 

1 * 00 - 14 - 1*0 

- 1000*0 

13 

2 * 00-12 

0«0 

- 4300*0 

13 

2 * 00-10 

OmO 

- 2400*0 

13 

U * 00-1 1 

0«0 

- 5260*0 
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Table C -5 

REACTION MECHANISM FOR H2-O2 PROPELLANT SYSTEM 


H 

+OH 

♦I'fli 

=H^u 

I 


6* 10-ii6 2*0 

0*0 

0 

+rt 

+|Vll 

= Ur1 

+M1 

21 

£•00-32 0*0 

0*0 

0 

+0 

+Ml 

=02 

+M1 


3»b0-30 1*0 

-340*0 

H 

4-H 

+,'fl2 

= ri2 

+M2 

22 

2*80-30 1*0 

0*0 

OH 

+H 


=H2 

+0 

la 

I •40-14-1 *0 

-7000*0 

OH 

+0 


=H 

+02 

11 

4*00-11 0*0 

0*0 

OH 



= m20 

+H 

14 

l*0C-l7-2«0 

-2900*0 

OH 

+0H 


=H20 

+0 

1:3 

UOO-11 0*0 

-1100*0 



■ 
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RC ~ radius of curvature of the 
circular arc of the throat 
RT = throat radius 
XO « axial distance from the origin 
of the coordinate system to the 
throat 

0 = throat divergence angle corre- 
sponding to the maximum value 
for which the throat conic equa- 
tion applies 


The conic equation for this case would have the following form: 

A s -1 for an upper equation, *M for a lower equation (-1 for this case 
B s RC^ - XO^ 

C s 2X0 
D = -I 

E = -(RC + RT) 


Xmax = RC sinQ + XO 


An example of a free boundary is shown in the sketch below. 



The freestream approach flow is 
inclined at 15 deg to the plume with 
a gamma (y) of 1.4, a Mach number 
of 10, and a static pressure of 0.1 
psfa. 


PINF = 0,1 (psfa) 

E = 0 (No pressure variation with axial distance) 
GAMMAINF = 1.4 
MINF = 10 
THETAINF = -15° 

Fig.C-3 - Sample of Botindarv Equations 
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